home *** CD-ROM | disk | FTP | other *** search
/ PowerQuest 2002 / PowerQuest 2002.iso / POWERQUEST / PQ PowerExpert SRM v5.0 / PX_Setup.exe / F12324_appsrvcs.dll < prev    next >
Encoding:
Text File  |  2002-02-19  |  78.4 KB  |  115 lines

  1. lagsnOroenotif>Use dReq4//ave:Dtxt///4////    xt/////If eqnotif>nDB:D4= L_CHECKED Tuest.    <tu//yCoAocapo4.%Dr}viFlagsn= yCoAocapo4.%Dr}viFlagsnOroenotif>nDB:Dhdeqq=dEve:Dt/4////    xt/////If eqcInDB3        4 = L_CHECKED Tuest.    <tu//yCoAocapo4.%Dr}viFlagsn= yCoAocapo4.%Dr}viFlagsnOroe("ciSnmphdeqq=dEve:Dt/4////    xt/////If eqcInDB3    4 = L_CHECKED Tuest.    <tu//yCoAocapo4.%Dr}viFlagsn= yCoAocapo4.%Dr}viFlagsnOroeRecordrt5avdReqq=dEve:Dt/4    equ/dRequ//If eq:DcInD4 = L_CHECKED Tuest.    <tu//yCoAocapo4.:DcInD = CStv(nPb.VanDB3            4)/4me(//dateTime(/(/yCoAocapo4.:DcInD = ""ofq4q=dEve:Dt/4dRequ//If eq:DcICC4 = L_CHECKED Tuest.    <tu//yCoAocapo4.:DcICc = CStv(nPb.Va5.L_TIT4)/4me(//dateTime(/(/yCoAocapo4.:DcICc = ""ofq44//ave:Dtxt////    xt/////If eq:DcIeq(4 = L_CHECKED Tuest.    <tu//yCoAocapo4.:DcIeq(t.r} = CStv(nPb.Vaeq(4txtS4)/4me(//dateTime(/(/yCoAocapo4.:DcIeq(t.r} = ""ofq44//ave:DtxtdRequ//If eqEmptyBin4 = L_CHECKED T.v  Tiofq4q=dEve:Dt/4dRequ//If eqEmptyTemp4 = L_CHECKED T.v  Time(/(ofq4q=dEve:Dt/4dRequ//If eqEmptyei, 4net4 = L_CHECKED T.v  Time(/(ofq4q=dEve:Dt/4dRequ//if .r}4t    =dReqag_Sa:4)) = 0 quest.r4//        eqag_Sa:4 = "0"Save/t4dt.r}//4dRequ//if .r}4t    =dReqRueea:4)) = 0 quest.r4//        eqRueea:4 = "0"Save/t4dt.r}//4////    xt/////If CLng(:Dfg_Sa:Unit4) = 0  Tuest.r4//t/yCoAocapo4.ag_Sa:        ColnofCLng(:Dfg_Sa:4)ofq4q=ddateest    CLng(:Dfg_Sa:Unit4) = 1 Tuest.r4//t/yCoAocapo4.ag_Sa:        ColnofCLng(:Dfg_Sa:4)e* KILOofq4q=ddateest    CLng(:Dfg_Sa:Unit4) = 2 Tuest.r4//t/yCoAocapo4.ag_Sa:        ColnofCLng(:Dfg_Sa:4)e* KILOe* KILOofq4q=ddateest    CLng(:Dfg_Sa:Unit4) = 3 Tuest.r4//t/yCoAocapo4.ag_Sa:        ColnofCLng(:Dfg_Sa:4)e* KILOe* KILOe* KILOofq4q=dEve:Dt/4dRequ//yCoAocapo4.queeav         = CLng(:DRueea:4)dRequ//yCoAocapo4.Durr|3iRe4eav  = :DDurr|3i4ofv caa    ave:Dt/4dRequ/dR'''''''''''''''''Threshold 5'''''''''''''''''''''''''''''''''''''''''''''''''''equ/dRequ/yCo        Col.Threshold5nofCLng(:DfRequ5)xt/4me(/If CLng(:DfRequ5) >denT.v  Tit.r4//tIf     yCoAocapoCol.Ceunt >d4nT.v Time(/(/ypf yCoAocapo5 = yCoAocapoCol.item(5Dofq4q=dEateTime(/(/ypf yCoAocapo5 = yCo        Col.C    ve vAocapo(Dofq4q=dEve:Dt/4dRequ//if .r}4t    =dReqRues4.5)) >denquest.r4//t/yCoAocapo5.Re4rt3    et = eqRues4.5t.r4//t/yCoAocapo5.i    of0SDir = ""ofq4q    t/yCoAocapo5.:DcIReport =d""ofq4q    t/yCoAocapo5.:DcIReportCc          = ""ofq4q    t/yCoAocapo5.:DcIReport    q(t.r}  = ""ofq4q    t/yCoAocapo5.ques4.CP- 4iest      = ""ofq4q    t/yCoAocapo5.qu3    i    of4i = 0ofq4q    t/yCoAocapo5.qu3    i    oASub = 0ofq4q    t/yCoAocapo5.Hour    = 0ofq4q    t/yCoAocapo5.:inut=  of0/4dRequ/t/yCoAocapo5.i    of0SDir = 2i    ofquest.r5ofq4q    t/yCoAocapo5.:DcIReport =d2iofReques4.5ofq4q    t/yCoAocapo5.:DcIReportCc          =  2iofReques4.CC5    ofq4q    t/yCoAocapo5.:DcIReport    q(t.r}  =  2iofReques4.Sub5ofq4q    t/yCoAocapo5.ques4.CP- 4iest      =  CStv(nPCP- 4iest5)vivi        g        qif eqei, 4fes5 = 0 quest.r4//    t/yCoAocapo5.qunImmedie vlly =dtruet.r4//e(dateTime(/(/DyCoAocapo5.qunImmedie vlly =dfaateTiTime(/(/Dyport4 Requd(eqei, 4fes5Dofq4q=dqu/Requd1vi        g        q    t/yCoAocapo5.Hour    = Hour(ToDe k5)vi        g        q    t/yCoAocapo5.:inut=  ofMinut=(ToDe k5Dofq4q=dqu/Requd2vi        g        q    t/yCoAocapo5.Hour    = Hour(ToDe k5) + 24v caa    gkTt    yCoAocapo5.:inut=  ofMinut=(ToDe k5D4q    4//t    ofq4q    4//tRequd3vi        g        q    t/yCoAocapo5.Hour    = Hour(ToDe k5)vi        g        q    t/yCoAocapo5.:inut=  ofMinut=(ToDe k5Dofv caa    4//t      {Temp =d""ofsDq    /        q    /    equ z    =d1eDB Lr}4nPqu3    i    of4i5)v caa    4//t    /If Mid4nPqu3    i    of4i5, z, 1D    = "," Tuest.r4//t    4//t/yCoAocapo5.qu3    i    of4i = yCoAocapo5.qu3    i    of4i +32 ^ (CLng(  {Temp))v caa    4//t    t      {Temp =d""ofq4q=dqu/u/EateTime(/(/Du/u/  {Temp =d  {Temp + Mid4nPqu3    i    of4i5, z, 1Dofq4q=dqu/u/Eve:Dt/4    i4tt4q    tNext.ssDq    /        q    /    equ z    =d1eDB Lr}4nPqu3    i    oASub5)v caa    4//t    /If Mid4nPqu3    i    oASub5, z, 1D    = "," Tuest.r4//t    4//t/yCoAocapo5.qu3    i    oASub = yCoAocapo5.qu3    i    oASub +32 ^ (CLng(  {Temp)-1)v caa    4//t    t      {Temp =d""ofq4q=dqu/u/EateTime(/(/Du/u/  {Temp =d  {Temp + Mid4nPqu3    i    oASub5, z, 1Dofq4q=dqu/u/Eve:Dt/4    i4tt4q    tNext.ssDq    /        q    Eve:yport4t.v caaqe(dt.r}//4me(//dateTime(/(/yCoAocapo5.Re4rt3    et = ""ofq4q    t/yCoAocapo5.i    of0SDir = ""ofq4q    t/yCoAocapo5.:DcIReport =d""ofq4q    t/yCoAocapo5.:DcIReportCc          = ""ofq4q    t/yCoAocapo5.:DcIReport    q(t.r}  = ""ofq4q    t/yCoAocapo5.ques4.CP- 4iest      = ""ofq4q    t/yCoAocapo5.qu3    i    of4i = 0ofq4q    t/yCoAocapo5.qu3    i    oASub = 0ofq4q    t/yCoAocapo5.Hour    = 0ofq4q    t/yCoAocapo5.:inut=  of0/4q4q    4dt.r}//4dRequ//yCoAocapo5.D/4_chk =d dreplack(ToD/4_chk5,chr(13),"")  dRequ//yCoAocapo5.MessP-  =   eqbessP- 5  /4dRequ//yCoAocapo5.%Dr}viFlagsnn=oeue203    DAbove Tit.r4//tIf nPest.cD")v ca5 = L_CHECKED T.v  Time(/((yCo        Col.Dris=AFlags1nofyCo        Col.Dris=AFlags1nqu  eest.cD")v ca5ofq44//ave:Dtxt////        dRequ//If eqEv|3iLog5 = L_CHECKED Tuest.    <tu//yCoAocapo5.%Dr}viFlagsn= yCoAocapo5.%Dr}viFlagsnOroe("cilCCestolet.t    ofq4q    4/yport4 ca    o CLng(:DSe-==ityLcv|l5Dofq4q=dquRequdevi        g        u//yCoAocapo5.%Dr}viFlagsnn=oyCoAocapo5.%Dr}viFlagsnqu  e("s=AeEk=ist.r44/qu/Requd2vi        g        q    tyCoAocapo5.%Dr}viFlagsnn=oyCoAocapo5.%Dr}viFlagsnqu  eInfoEk=ist.r44/qu/Requd1vi        g        q    tyCoAocapo5.%Dr}viFlagsnn=oyCoAocapo5.%Dr}viFlagsnqu  eWa")Ek=ist.r44/qu/RequddateTime(/(/DuyCoAocapo5.%Dr}viFlagsnn=oyCoAocapo5.%Dr}viFlagsnqu  eInfoEk=ist    ofq4q    4/Eve:yport4t.    4//t    ofq4q    4/yCoAocapo5.E3")vc ss=A = CStv(nPEv|3iLogc ss=A5Dofq4q=d
  2. 4eq4//ave:Dtxt//dRequ//If eqnotif>5= L_CHECKED Tuest.    <tu//yCoAocapo5.%Dr}viFlagsn= yCoAocapo5.%Dr}viFlagsnOroenotif>Use dReq4//ave:Dtxt///4////    xt/////If eqnotif>nDB:D5= L_CHECKED Tuest.    <tu//yCoAocapo5.%Dr}viFlagsn= yCoAocapo5.%Dr}viFlagsnOroenotif>nDB:Dhdeqq=dEve:Dt/4////    xt/////If eqcInDB3        5 = L_CHECKED Tuest.    <tu//yCoAocapo5.%Dr}viFlagsn= yCoAocapo5.%Dr}viFlagsnOroe("ciSnmphdeqq=dEve:Dt/4////    xt/////If eqcInDB3    5 = L_CHECKED Tuest.    <tu//yCoAocapo5.%Dr}viFlagsn= yCoAocapo5.%Dr}viFlagsnOroeRecordrt5avdReqq=dEve:Dt/4    equ/dRequ//If eq:DcInD5 = L_CHECKED Tuest.    <tu//yCoAocapo5.:DcInD = CStv(nPb.VanDB3            5)/4me(//dateTime(/(/yCoAocapo5.:DcInD = ""ofq4q=dEve:Dt/4dRequ//If eq:DcICC5 = L_CHECKED Tuest.    <tu//yCoAocapo5.:DcICc = CStv(nPb.Va5.L_TIT5)/4me(//dateTime(/(/yCoAocapo5.:DcICc = ""ofq44//ave:Dtxt////    xt/////If eq:DcIeq(5 = L_CHECKED Tuest.    <tu//yCoAocapo5.:DcIeq(t.r} = CStv(nPb.Vaeq(4txtS5)/4me(//dateTime(/(/yCoAocapo5.:DcIeq(t.r} = ""ofq44//ave:DtxtdRequ//If eqEmptyBin5 = L_CHECKED T.v  Tiofq4q=dEve:Dt/4dRequ//If eqEmptyTemp5 = L_CHECKED T.v  Time(/(ofq4q=dEve:Dt/4dRequ//If eqEmptyei, 4net5 = L_CHECKED T.v  Time(/(ofq4q=dEve:Dt/4dRequ//if .r}4t    =dReqag_Sa:5)) = 0 quest.r4//        eqag_Sa:5 = "0"Save/t4dt.r}//4dRequ//if .r}4t    =dReqRueea:5)) = 0 quest.r4//        eqRueea:5 = "0"Save/t4dt.r}//4////    xt/////If CLng(:Dfg_Sa:Unit5) = 0  Tuest.r4//t/yCoAocapo5.ag_Sa:        ColnofCLng(:Dfg_Sa:5)ofq4q=ddateest    CLng(:Dfg_Sa:Unit5) = 1 Tuest.r4//t/yCoAocapo5.ag_Sa:        ColnofCLng(:Dfg_Sa:5)e* KILOofq4q=ddateest    CLng(:Dfg_Sa:Unit5) = 2 Tuest.r4//t/yCoAocapo5.ag_Sa:        ColnofCLng(:Dfg_Sa:5)e* KILOe* KILOofq4q=ddateest    CLng(:Dfg_Sa:Unit5) = 3 Tuest.r4//t/yCoAocapo5.ag_Sa:        ColnofCLng(:Dfg_Sa:5)e* KILOe* KILOe* KILOofq4q=dEve:Dt/4dRequ//yCoAocapo5.queeav         = CLng(:DRueea:5)dRequ//yCoAocapo5.Durr|3iRe4eav  = :DDurr|3i5ofv caa    ave:Dt/4dRv caayCo        ColAdvisor.SetsDr}vi yCo        ColsD<4/ave:}//4dR<t    ol<tif g_itemType    =denT.v    ''Screening pDr}vi/4e(//4dRe/ave:}//4dR<t'if err.numbe  <>denquest.r4'/ypfEk=Msg err.de P----tgr    & err.numbe t.r4'/ypf        Col     =dfaateTimp'eateTimp/ypf        Colnoftruet.r4'Et.r}/ t.v dR<typf yCoAocapo1 = nothingdR<typf yCoAocapo2 = nothingdR<typf yCoAocapoCol =dnothingdR<typf yCo        ColnofnothingdR<typf yCo        ColAdvisor = nothingdR<typf yCoSe-==ity = nothingdRol<}//("cilCCV>
  3. 4ncdRol<Allocapoiypss=D/4_onJavaSP----().sv cDim L_PERCENTOFDEVICE_TEXTAdjDim L_BOUND_TEXT  AdjDim L_BYTES_TEXTAdjDim L_KB_TEXT<t    ol<Dim L_MB_TEXT<t    ol<Dim L_GB_TEXT<t    ol<Dim L_TB_TEXT<t    ol<Dim L_INVALIDLIMIT_TEXT<t    ol<Dim L_INVALIDOBJ_TEXTAdjncdRol<L_BYTES_TEXT        = GetLocStv P-("WQ:Dcn.dll","40201B58", "")/4    L_KB_TEXT<t    = GetLocStv P-("WQ:Dcn.dll","40201B59", "")/4    L_MB_TEXT<t    = GetLocStv P-("WQ:Dcn.dll","40201B5A", "")/4    L_GB_TEXT<t    = GetLocStv P-("WQ:Dcn.dll","40201B5b", "") /4    L_TB_TEXT<t    = GetLocStv P-("WQ:Dcn.dll","40201B5c", "")  /4    L_PERCENTOFDEVICE_TEXT  = GetLocStv P-("WQ:Dcn.dll","40201B5D", "") /4    L_INVALIDOBJ_TEXT = GetLocStv P-("WQ:Dcn.dll","C0202329","")/4dReDim L_ENTERPOLICYNAME_TEXTAdjL_ENTERPOLICYNAME_TEXT = GetLocStv P-("WQ:Dcn.dll","C020233F", "")/4
  4. 4ncdRol<%>/4    ofq4< P---- languP- ="VBSP----" >dR<tynnck=is resum//next.st/eq( FormatDe k(i caa)dRequ/Dim yCoof4i,yCooASub,yCoIn, 4fes,yCoDe k/4dRequ/i caag= CStv(T    =dRi caa))dRequ/dRt.r4//yport4 Requd(i caa)dRequ/   cequdevi        g         yCoIn, 4fesg= docum(4c.frmTask.cmbIn, 4fes.sport4edIndexvi        g         yCoDe kg= docum(4c.frmTask.txtDe k.vtxtSdRt.r4//   cequd1vi        g         yCoIn, 4fesg= docum(4c.frmTask.cmbIn, 4fes1.sport4edIndexvi        g         yCoDe kg= docum(4c.frmTask.txtDe k1.vtxtSdRt.r4//   cequd2vi        g         yCoIn, 4fesg= docum(4c.frmTask.cmbIn, 4fes2.sport4edIndexvi        g         yCoDe kg= docum(4c.frmTask.txtDe k2.vtxtSdRt.r4//   cequd3vi        g         yCoIn, 4fesg= docum(4c.frmTask.cmbIn, 4fes3.sport4edIndexvi        g         yCoDe kg= docum(4c.frmTask.txtDe k3.vtxtSdRt.r4//   cequd4vi        g         yCoIn, 4fesg= docum(4c.frmTask.cmbIn, 4fes4.sport4edIndexvi        g         yCoDe kg= docum(4c.frmTask.txtDe k4.vtxtSdRt.r4//   cequd5vi        g         yCoIn, 4fesg= docum(4c.frmTask.cmbIn, 4fes5.sport4edIndexvi        g         yCoDe kg= docum(4c.frmTask.txtDe k5.vtxtSdR        q    Eve:yport4t.v caaqIf yCoIn, 4fesg<>denquest.r4//tif .r}4yCoDe k) <= 0  is fesidateDe k(yCoDe k) =dfaate quest.r4//aayCoDe kg= FormatDateDe k("<% =Now%>",3)/4me(//dateTime(/(/yCoDe kg= FormatDateDe k(yCoDe k,3)/4me(//dt.r}//4////ave:Dtxt//Eve:yubt.v dR<tAllocapoifesidateDe k(i caa)dRequdRequIf IsDate(i caa) Tuest.r4//fesidateDe k =dtruet.r4/dateTime(/fesidateDe k =dfaateTimpdEve:Dt/4dReq}//("cilCCV>
  5. 4q4</ P---->t.v dR<t< P---- languP- ="JavaSP----" src="../inc_globes.js">
  6. 4q4</ P---->t.<t< P---- languP- ="JavaSP----">t.<tvar yCoFormn=oefes("docum(4c.frmTask");t.<tvar i)vc lTabn= yCoForm.TabSport4ed.vtxtS;t.<%      EmitWQSP----          %>qudReqfllocapoiyptPassiveO--tgrs(Dofq4{Timpdvar yCoFormn=oefes("docum(4c.frmTask");udRequif (yCoForm.chkSoftLimit.checked)dRequ{dRequ/yCoForm.chkDiskFullEk=isCode.checked =dfaate ;dRequ/yCoForm.chk    ofqOpen.n Ms.checked =dfaate ;dRequ/yCoForm.txtOs=ADraft.vtxtS = "" ;dRequ/yCoForm.txtOs=ADraft.style.backgroundColor="lightgrey";dRequ/yCoForm.cmbUnits1.sport4edIndex  of0 ;dRequ/yCoForm.cmbUnits1.style.backgroundColor="lightgrey";dRdRequ/yCoForm.chkDiskFullEk=isCode.disabled =dtrue ;dRequ/yCoForm.chk    ofqOpen.n Ms.disabled =dtrue ;dRequ/yCoForm.txtOs=ADraft.disabled =dtrue ;dRequ/yCoForm.cmbUnits1.disabled =dtrue ;dRdRequ}t.r4/dateTime({dRequ/yCoForm.chkDiskFullEk=isCode.disabled =dfaate ;dRequ/yCoForm.chk    ofqOpen.n Ms.disabled =dfaate ;dRequ/yCoForm.txtOs=ADraft.disabled =dfaate ;dRequ/yCoForm.cmbUnits1.disabled =dfaate ;dRequ/yCoForm.txtOs=ADraft.style.backgroundColor="white";dRequ/yCoForm.cmbUnits1.style.backgroundColor="white";dRequ}t.r4}qu/dRt.r4dReqfllocapoisDr}viVesidatePP- (Dofq4{udRequreturndtrue ;dReq}
  7. 4ncdRol<    4//t    ofq4fllocapoiLimitVesidatePP- (Dofq4{Timpdvar yCoLimit=docum(4c.frmTask.txtSpaceLimit;xt///4///if (isNaN(yCoLimit.vtxtS) || yCoLimit.vtxtS..r}gub =of0 )dRequ{dRequ/checkSizeAndUnits(yCoLimit.vtxtS,docum(4c.frmTask.cmbUnits.o--tgrs[docum(4c.frmTask.cmbUnits.sport4edIndex].text) t.r4//tif (docum(4c.frmTask.cmbUnits.o--tgrs[docum(4c.frmTask.cmbUnits.sport4edIndex].text =of'<% = L_BYTES_TEXT%>')/4me(//SA_DisplayEk=('<%=SA_Escape        Coes(L_INVALIDLIMIT1_TEXT)%>') ;dRequ/    dRequ/if (docum(4c.frmTask.cmbUnits.o--tgrs[docum(4c.frmTask.cmbUnits.sport4edIndex].text =of'<% = L_KB_TEXT%>')/4me(//SA_DisplayEk=('<%=SA_Escape        Coes(L_INVALIDLIMIT2_TEXT)%>') ;dRequ/    dRequ/if (docum(4c.frmTask.cmbUnits.o--tgrs[docum(4c.frmTask.cmbUnits.sport4edIndex].text =of'<% = L_MB_TEXT%>')/4me(//SA_DisplayEk=('<%=SA_Escape        Coes(L_INVALIDLIMIT3_TEXT)%>') ;dRequ/    dRequ/if (docum(4c.frmTask.cmbUnits.o--tgrs[docum(4c.frmTask.cmbUnits.sport4edIndex].text =of'<% = L_GB_TEXT%>')/4me(//SA_DisplayEk=('<%=SA_Escape        Coes(L_INVALIDLIMIT4_TEXT)%>') ;dRequ/    dRequ/if (docum(4c.frmTask.cmbUnits.o--tgrs[docum(4c.frmTask.cmbUnits.sport4edIndex].text =of'<% = L_TB_TEXT%>')/4me(//SA_DisplayEk=('<%=SA_Escape        Coes(L_INVALIDLIMIT5_TEXT)%>') ;dRequ/    dRequ/docum(4c.frmTask.onkeypressn= ClearEk= dRequ/docum(4c.frmTask.txtSpaceLimit.focus(D;dRequ/docum(4c.frmTask.txtSpaceLimit.sport4(D;dRequ/returndfaate;   /4dRequ}dRt.r4dReq/if (docum(4c.frmTask.cmbUnits.sport4edIndex != 5)dRequ{dRequ/var nLimit = new Numbe (yCoLimit.vtxtS) ;dRequ/if (nLimit =of0)  /4xixi4//{dRequ//checkSizeAndUnits(yCoLimit.vtxtS,docum(4c.frmTask.cmbUnits.o--tgrs[docum(4c.frmTask.cmbUnits.sport4edIndex].text) t.r4//ttif (docum(4c.frmTask.cmbUnits.o--tgrs[docum(4c.frmTask.cmbUnits.sport4edIndex].text =of'<% = L_BYTES_TEXT%>')/4me(//SA_DisplayEk=('<%=SA_Escape        Coes(L_INVALIDLIMIT1_TEXT)%>') ;dRequ/    dRequ/if (docum(4c.frmTask.cmbUnits.o--tgrs[docum(4c.frmTask.cmbUnits.sport4edIndex].text =of'<% = L_KB_TEXT%>')/4me(//SA_DisplayEk=('<%=SA_Escape        Coes(L_INVALIDLIMIT2_TEXT)%>') ;dRequ/    dRequ/if (docum(4c.frmTask.cmbUnits.o--tgrs[docum(4c.frmTask.cmbUnits.sport4edIndex].text =of'<% = L_MB_TEXT%>')/4me(//SA_DisplayEk=('<%=SA_Escape        Coes(L_INVALIDLIMIT3_TEXT)%>') ;dRequ/    dRequ/if (docum(4c.frmTask.cmbUnits.o--tgrs[docum(4c.frmTask.cmbUnits.sport4edIndex].text =of'<% = L_GB_TEXT%>')/4me(//SA_DisplayEk=('<%=SA_Escape        Coes(L_INVALIDLIMIT4_TEXT)%>') ;dRequ/    dRequ/if (docum(4c.frmTask.cmbUnits.o--tgrs[docum(4c.frmTask.cmbUnits.sport4edIndex].text =of'<% = L_TB_TEXT%>')/4me(//SA_DisplayEk=('<%=SA_Escape        Coes(L_INVALIDLIMIT5_TEXT)%>') ;dRequ/    dRequ//docum(4c.frmTask.onkeypressn= ClearEk= dRequ//docum(4c.frmTask.txtSpaceLimit.focus(D;dRequ//docum(4c.frmTask.txtSpaceLimit.sport4(D;dRequ//returndfaate;   /4    equ}t.r4/}dRt.r4    //max vtxtS -ifesidatedReq/if (checkSizeAndUnits(yCoLimit.vtxtS,docum(4c.frmTask.cmbUnits.o--tgrs[docum(4c.frmTask.cmbUnits.sport4edIndex].text)  =offaate)dRequ{dRequ/tif (docum(4c.frmTask.cmbUnits.o--tgrs[docum(4c.frmTask.cmbUnits.sport4edIndex].text =of'<% = L_BYTES_TEXT%>')/4me(///SA_DisplayEk=('<%=SA_Escape        Coes(L_INVALIDLIMIT1_TEXT)%>') ;dRequ/        dRequ/tif (docum(4c.frmTask.cmbUnits.o--tgrs[docum(4c.frmTask.cmbUnits.sport4edIndex].text =of'<% = L_KB_TEXT%>')/4me(///SA_DisplayEk=('<%=SA_Escape        Coes(L_INVALIDLIMIT2_TEXT)%>') ;dRequ/        dRequ/tif (docum(4c.frmTask.cmbUnits.o--tgrs[docum(4c.frmTask.cmbUnits.sport4edIndex].text =of'<% = L_MB_TEXT%>')/4me(///SA_DisplayEk=('<%=SA_Escape        Coes(L_INVALIDLIMIT3_TEXT)%>') ;dRequ/        dRequ/tif (docum(4c.frmTask.cmbUnits.o--tgrs[docum(4c.frmTask.cmbUnits.sport4edIndex].text =of'<% = L_GB_TEXT%>')/4me(///SA_DisplayEk=('<%=SA_Escape        Coes(L_INVALIDLIMIT4_TEXT)%>') ;dRequ/        dRequ/tif (docum(4c.frmTask.cmbUnits.o--tgrs[docum(4c.frmTask.cmbUnits.sport4edIndex].text =of'<% = L_TB_TEXT%>')/4me(///SA_DisplayEk=('<%=SA_Escape        Coes(L_INVALIDLIMIT5_TEXT)%>') ;dRequ/        dRequ/docum(4c.frmTask.onkeypressn= ClearEk= dRequ/docum(4c.frmTask.txtSpaceLimit.focus(D;dRequ/docum(4c.frmTask.txtSpaceLimit.sport4(D;dRequ/returndfaate;dRequ}t.r4/    dRequdRequvar OCoFormn=oefes("docum(4c.frmTask");udRequOCoForm.hdncmbUnits.vtxtS = OCoForm.cmbUnits.sport4edIndex ;dRequOCoForm.hdncmbUnits1.vtxtS = OCoForm.cmbUnits1.sport4edIndex ;dRdReq/if(docum(4c.frmTask.chkSoftLimit.checked)dRequ    docum(4c.frmTask.chkSoftLimit.vtxtS="<%=L_CHECKED%>";dRequdateTime(/docum(4c.frmTask.chkSoftLimit.vtxtS="<%=L_UNCHECKED%>";dRequdReq/if(docum(4c.frmTask.chkDiskFullEk=isCode.checked)dRequ    docum(4c.frmTask.chkDiskFullEk=isCode.vtxtS="<%=L_CHECKED%>";dRequdateTime(/docum(4c.frmTask.chkDiskFullEk=isCode.vtxtS="<%=L_UNCHECKED%>";dRequdReq/if(docum(4c.frmTask.chkExcludeFromFolderLimit.checked)dRequ        docum(4c.frmTask.chkExcludeFromFolderLimit.vtxtS="<%=L_CHECKED%>";dRequdateTime(/    docum(4c.frmTask.chkExcludeFromFolderLimit.vtxtS="<%=L_UNCHECKED%>";r4/    dRequdRequif(docum(4c.frmTask.chkSofqOpen.n Ms.checked)dRequ        docum(4c.frmTask.chkSofqOpen.n Ms.vtxtS="<%=L_CHECKED%>";dRequdateTime(/    docum(4c.frmTask.chkSofqOpen.n Ms.vtxtS="<%=L_UNCHECKED%>";dRequdReq/if(docum(4c.frmTask.chkResetHiWater.checked)dRequ        docum(4c.frmTask.chkResetHiWater.vtxtS="<%=L_CHECKED%>";dRequdateTime(/    docum(4c.frmTask.chkResetHiWater.vtxtS="<%=L_UNCHECKED%>";dRequdReq/equdReq/returndtrue;dReq}
  8. 4ncdRoldReq//iyptData("cilCCV>
  9. 4q4//i---------------------
  10. 4q4//iThis fllocapoiis called by que Property PP-  framework chk is called
  11. 4q4//ionlyr}/ VesidatePP-  returned a successn(true) code. Typically you would
  12. 4q4//imodify hiddendformnfields at quis poi4c. dRexixi//
  13. 4q4//iThis fllocapoimust be included is a java P---- runte k ck=is will occur.
  14. 4q4//dReqfllocapoiyptData(Dofq4{TimpddReq}
  15. 4u/dRt.r4dR
  16. 4q4//i("cilCCV> GroupInit
  17. 4q4//i-----------------------
  18. 4q4//This fllocapoiis called by Init to initiesize "yport4 Groups" pP-  dReqfllocapoiGroupInit(Dofq4{Timpdvar hdnsDr}vi of'<%=g_Groups%>' ;dRequvar hdnAllsDr}vi of'<%=g_AllGroups%>' ;dRequdRequvar i,strFormat,strVtxtS;t./u/  {Format = "";t./u/  {VtxtS = "" ;dRt.r4    //Populate Sport4edisDr}vies Listboxvi        ixi4for (i of0 ; i < hdnsDr}vi..r}gub ;i++)dRequ{dRequ/if (hdnsDr}vi.sub  {(i,1) != '|')/4me(//  {Format =   {Format + hdnsDr}vi.sub  {(i,1) ;dRequ/dateTime(/{/4me(//  {VtxtS =   {Format ;/4me(//  {Format = GetADShortName(  {Format);/4dRequ//yCoForm.lstsDr}vi.o--tgrs[yCoForm.lstsDr}vi..r}gub] = new O--tgr(strFormat,strVtxtS,faate,faate) ;/4me(//  {Format = "" ;dRequ//  {VtxtS = "" ;dR    equ}t.r4/}dRt.r4    t.r4    //Populate AvailableisDr}vies Listboxvi        /  {Format = "";t./u/  {VtxtS = "" ;dRequvar bExists =dfaate ; dRequfor (i of0 ; i < hdnAllsDr}vi..r}gub ;i++)dRequ{dRequ/if (hdnAllsDr}vi.sub  {(i,1) != '|')/4me(//  {Format =   {Format + hdnAllsDr}vi.sub  {(i,1) ;dRequ/dateTime(/{/4me(//  {VtxtS =   {Format ;/4me(//  {Format = GetADShortName(  {Format);/4qu/        dRequ/tif (yCoForm.lstsDr}vi..r}gub >de)/4me(//{/4me(//ufor (j=0 ; j < yCoForm.lstsDr}vi..r}gub ; j++)dRequ(//{/4me(//utif (  {Format.toLowerRequ( ) =ofyCoForm.lstsDr}vi.o--tgrs[j].text.toLowerRequ( ) ) t. me(/(/DubExists =dtrue ;dRequ/qu}t.r4/    qudReq/equif (bExists =offaate)dRequ(//{/4me(//utyCoForm.lstAllsDr}vi.o--tgrs[yCoForm.lstAllsDr}vi..r}gub] = new O--tgr(strFormat,strVtxtS,faate,faate) ;/4me(////  {Format = "" ;dRequ////  {VtxtS = "" ;dR    eququ}t.r4/    qudateTime(/(/{/4me(////  {Format = "" ;dRequ////  {VtxtS = "" ;dR    eququ}t.r4/    qubExists =dfaate ;t.r4/    q}/4me(//dateTime(/({Time(/(/yCoForm.lstAllsDr}vi.o--tgrs[yCoForm.lstAllsDr}vi..r}gub] = new O--tgr(strFormat,strVtxtS,faate,faate) ;/4me(///  {Format = "" ;dRequ///  {VtxtS = "" ;dR    equq}dR    equ}t.r4/}dRt.r4    t.r4ixi4if ( yCoForm.lstAllsDr}vi..r}gub =of0 )dRequ{dRequxixidocum(4c.frmTask.btnADD.disabled=dtrue ;dRequ}t.r4/dateTime({dRequ/yCoForm.lstAllsDr}vi.o--tgrs[0].sport4ed=true;dReq/}dRt.r4xixiif ( yCoForm.lstsDr}vi..r}gub =of0 )dRequ{dRequxixidocum(4c.frmTask.btnREMOVE.disabled=dtrue ;dRequ}t.r4/t.r4    //Enableior disable Next buttpoidepending poinumbe  of sport4ed pDr}vies t.r4    makeDisable(docum(4c.frmTask.lstsDr}vi) ;dRequdRequSport4.n Ms() ;dRequdocum(4c.frmTask.btnADD.focus(D;    /4    ofq4}dRt.r
  19. 4q4//i.n terInit "cilCCV>
  20. 4q4//i-----------------------
  21. 4q4//This fllocapoiis called by Init to initiesize "yport4 .n ter" pP-  dReqfllocapoi.n terInit(Dofq4{Timpdvar hdnInclude = unescape('<%=g_Include%>') ;dRequvar hdnExclude = unescape('<%=g_Exclude%>') ;dRequ/    dRequvar i,strFormat;t./u/  {Format = "";t.t.r4    //Populate Sport4edi.n ters Include  Listboxvi        ixi4for (i of0 ; i < hdnInclude..r}gub ;i++)dRequ{dRequ/if (hdnInclude.sub  {(i,1) != '|')/4me(//  {Format =   {Format + hdnInclude.sub  {(i,1) ;dRequ/dateTime(/{/4me(//yCoForm.lstInclude.o--tgrs[yCoForm.lstInclude..r}gub] = new O--tgr(strFormat,strFormat,faate,faate) ;/4me(//  {Format = "" ;dRequ/}t.r4/}dRt.r4      {Format = "";t.t.r4    //Populate Sport4edi.n ters  Exclude Listboxvi        ixi4for (i of0 ; i < hdnExclude..r}gub ;i++)dRequ{dRequ/if (hdnExclude.sub  {(i,1) != '|')/4me(//  {Format =   {Format + hdnExclude.sub  {(i,1) ;dRequ/dateTime(/{/4me(//yCoForm.lstExclude.o--tgrs[yCoForm.lstExclude..r}gub] = new O--tgr(strFormat,strFormat,faate,faate) ;/4me(//  {Format = "" ;dRequ/}t.r4/}dRu/    dRequmakeDisableText(yCoForm.hdnlstsDr}vi);t.t.r4}i// dt.rof .n terInit(DofdRoldReq//iAocapoInit "cilCCV>
  22. 4q4//i-----------------------
  23. 4q4//This fllocapoiis called by Init to initiesize "yport4 Aocapo" pP-  dReqfllocapoiAocapoInit(Dofq4{TimpdmakeDisableText(yCoForm.hdnlstsDr}vi);t.    r4dReq/if (docum(4c.frmTask.chkRunques4..vtxtS =of'<%=L_CHECKED%>')dRequ    docum(4c.frmTask.cmbRunques4..sport4edIndex  ofNumbe (docum(4c.frmTask.cmbRunques4.Index.vtxtS) ;dRequ//    dRequvar nypo = new Numbe (docum(4c.frmTask.hdnIn, 4fes.vtxtS);dRequdocum(4c.frmTask.cmbIn, 4fes.sport4edIndex = nypo.vtxtSOf() ;dRequChangeDe kFormat('0');dRequdocum(4c.frmTask.cmbMsgLvs.sport4edIndex = docum(4c.frmTask.hdncmbMsgLvs.vtxtS ;dRdReq/if (docum(4c.frmTask.hdnqu3    i    of4i.vtxtS..r}gub >f0 )dRequ{dRequ/var   {Format = '';dRequ/for (var z=0 ; z < docum(4c.frmTask.hdnqu3    i    of4i.vtxtS..r}gub ; z++)dRequ({t.r4//ttif (docum(4c.frmTask.hdnqu3    i    of4i.vtxtS.sub  {(z,1) != ',')/4me(////  {Format =   {Format + docum(4c.frmTask.hdnqu3    i    of4i.vtxtS.sub  {(z,1) ;t.r4/    qudateTime(/(/{/4me(////yCoForm.lstqu3    i    of4i.o--tgrs[Numbe (  {Format)].sport4ed =dtrue ;dRequ/qu/  {Format = "" ;dRequ///}dR    equ}t.r4/}dRt.r4    if (docum(4c.frmTask.hdnqu3    i    oASub.vtxtS..r}gub >f0 )dRequ{dRequ/var   {Format = '';dRequ/for (var z=0 ; z < docum(4c.frmTask.hdnqu3    i    oASub.vtxtS..r}gub ; z++)dRequ({t.r4//ttif (docum(4c.frmTask.hdnqu3    i    oASub.vtxtS.sub  {(z,1) != ',')/4me(////  {Format =   {Format + docum(4c.frmTask.hdnqu3    i    oASub.vtxtS.sub  {(z,1) ;t.r4/    qudateTime(/(/{/4me(////yCoForm.lstqu3    i    oASub.o--tgrs[Numbe (  {Format)].sport4ed =dtrue ;dRequ/qu/  {Format = "" ;dRequ///}dR    equ}t.r4/}dRequ/qu/   /4    eqCheckMyCASurols(D; /4    eqVesidateQuarantine(yCoForm.chk.n MCASu(4c);dR t.r4}i// dt.rof AocapoInit(D    dReqfllocapoiGroupVesidatePP- (Dofq4{Timpdif (yCoForm.lstsDr}vi..r}gub <of0 )dRequ{dRequ/SA_DisplayEk=('<%=SA_Escape        Coes(L_ENTERPOLICYNAME_TEXT)%>') ;dRequ/docum(4c.frmTask.onkeypressn= ClearEk= dRequ/returndfaate;  t.r4/}dRt.r4    yCoForm.hdnlstsDr}vi.vtxtS = ""dRequfor (i of0 ; i < yCoForm.lstsDr}vi..r}gub ;i++)dRequ{dRequ/yCoForm.hdnlstsDr}vi.vtxtS = yCoForm.hdnlstsDr}vi.vtxtS + fyCoForm.lstsDr}vi.o--tgrs[i].vtxtS + "|" ;dRequ}t.r4/t.r4t.r4    yCoForm.hdnlstAllsDr}vi.vtxtS = ""dRequfor (i of0 ; i < yCoForm.lstAllsDr}vi..r}gub ;i++)dRequ{dRequ/yCoForm.hdnlstAllsDr}vi.vtxtS  = yCoForm.hdnlstAllsDr}vi.vtxtS  + fyCoForm.lstAllsDr}vi.o--tgrs[i].vtxtS + "|" ;dRequ}t.r4/t.r4udRequreturndtrue ;dReq}
  24. 4nceqfllocapoi.n terVesidatePP- (Dofq4{TimpdyCoForm.hdnlstInclude.vtxtS = ""dRequfor (i of0 ; i < yCoForm.lstInclude..r}gub ;i++)dRequ{dRequ/yCoForm.hdnlstInclude.vtxtS = yCoForm.hdnlstInclude.vtxtS + fyCoForm.lstInclude.o--tgrs[i].vtxtS + "|" ;dRequ}t.r4/t.r4t.r4    yCoForm.hdnlstExclude.vtxtS = ""dRequfor (i of0 ; i < yCoForm.lstExclude..r}gub ;i++)dRequ{dRequ/yCoForm.hdnlstExclude.vtxtS  = yCoForm.hdnlstExclude.vtxtS  + fyCoForm.lstExclude.o--tgrs[i].vtxtS + "|" ;dRequ}t.r4/t.r4uyCoForm.hdnlstInclude.vtxtS = escape(yCoForm.hdnlstInclude.vtxtS);dRequyCoForm.hdnlstExclude.vtxtS = escape(yCoForm.hdnlstExclude.vtxtS);t.    r4dReqdRequreturndtrue ;dReq}
  25. 4ncdRolt.r
  26. 4q4fllocapoi Sport4.n Ms()ofq4{Timpdvar i,j,  {Format ;/4me(  {Format = "" ;dRTimpdvar Sport4ed =ddocum(4c.frmTask.lstAllsDr}vi.sport4edIndex ;dRequif (Sport4ed <f0 )dRequ{dRequ/yCoForm.lstUnAuthorized..r}gub = 0;dRequ/yCoForm.lstAuthorized..r}gub = 0;dRequ/dRequ}t.r4/dateTime({dRequ/var Sport4edGroupName =ddocum(4c.frmTask.lstAllsDr}vi.o--tgrs[docum(4c.frmTask.lstAllsDr}vi.sport4edIndex].text ;dRequ/for (j of0 ;j < hdn..r}gub ;j++)dRequ({t.r4//tif (Sport4edGroupName == hdn[j])/4me(//{/4me(//uSport4ed =dj ;dRequ///break;dR    equq}dR    equ}t.dR    equ//Populate UnAuthorized Listboxvi        //yCoForm.lstUnAuthorized..r}gub = 0;dReqixi4/for (i of0 ; i < hdnUnAuth[Sport4ed]..r}gub ;i++)dRequ({t.r4//tif (hdnUnAuth[Sport4ed].sub  {(i,1) != '|')/4me(///  {Format =   {Format + hdnUnAuth[Sport4ed].sub  {(i,1) ;/4me(//dateTime(/({Time(/(/yCoForm.lstUnAuthorized.o--tgrs[yCoForm.lstUnAuthorized..r}gub] = new O--tgr(strFormat,strFormat,faate,faate) ;/4me(///  {Format = "" ;dRequ//}dR    equ}t.r4/udReq/e  {Format = "" ;dRequ/yCoForm.lstAuthorized..r}gub = 0;dReqixi4/for (i of0 ; i < hdnAuth[Sport4ed]..r}gub ;i++)dRequ({t.r4//tif (hdnAuth[Sport4ed].sub  {(i,1) != '|')/4me(///  {Format =   {Format + hdnAuth[Sport4ed].sub  {(i,1) ;/4me(//dateTime(/({Time(/(/yCoForm.lstAuthorized.o--tgrs[yCoForm.lstAuthorized..r}gub] = new O--tgr(strFormat,strFormat,faate,faate) ;/4me(///  {Format = "" ;dRequ//}dR    equ}t.r4/}r4udRequreturndtrue ;dReq}    equ/dRt.r4///iAddNewsDr}vi "cilCCV>
  27. 4q4//i---------------------
  28. 4q4//Adds new sDr}vies to list boxvi        fllocapoiAddNewsDr}vi(Dofq4{Timpdvar yColstsDr}vi=docum(4c.frmTask.lstsDr}vi;Timpdvar yColstAll=docum(4c.frmTask.lstAllsDr}vi;dRequif ( yColstAll..r}gub.vtxtS !=f0 )dRequ{dRequ/var Sport4ed =dyColstAll.sport4edIndex ;dRequuif ( Sport4ed <f0 )dRequ(/yColstAll.o--tgrs[0].sport4ed=true;dRdRequ/yColstsDr}vi.o--tgrs[yColstsDr}vi..r}gub] = new O--tgr(yColstAll.o--tgrs[yColstAll.sport4edIndex].text,yColstAll.o--tgrs[yColstAll.sport4edIndex].vtxtS,faate,faate);dRequ/yColstAll.o--tgrs[yColstAll.sport4edIndex] = null ;dRequ/dRequuif ( yColstAll..r}gub =of0 )dRequ({Time(/(docum(4c.frmTask.btnADD.disabled=dtrue ;dRequu/dRequu}dRequuif ( Sport4ed >of0 )dRequ({Time(/(if ( Sport4ed =of0 ) {t.r4//ttif (yColstAll..r}gub !=f0)/4me(///  yColstAll.o--tgrs[0].sport4ed=true;dRr4/    qudateTime(/(/ixidocum(4c.frmTask.btnADD.disabled=dtrue ;dRequuu}dRequuixi4dateTime(/(/yColstAll.o--tgrs[Sport4ed - 1].sport4ed=true;dRr4/    }dRequuif ( yColstsDr}vi..r}gub >de)/4me(/{Time(/(docum(4c.frmTask.btnREMOVE.disabled=dfaate ;t.r4/    qyColstsDr}vi.o--tgrs[yColstsDr}vi..r}gub-1].sport4ed=true;dRr4/    }    t.r4/}r4u    t.r4/dateTime({dRequ/dRexixiu/docum(4c.frmTask.onmousedownn= ClearEk=dRexixiu/dRequ}t.r4/makeDisable(docum(4c.frmTask.lstsDr}vi) ;dRequSport4.n Ms();dReq}
  29. 4nceq//iRemovesDr}vi "cilCCV>
  30. 4q4//i---------------------
  31. 4q4//Removes sDr}vies from list box (On REMOVE buttpoipress)vi        fllocapoiRemovesDr}vi(Dofq4{TimpdyptPageChanged(true);dRequdRequvar yColstsDr}vi=docum(4c.frmTask.lstsDr}vi;    Timpdvar yColstAll=docum(4c.frmTask.lstAllsDr}vi;dRequif ( yColstsDr}vi.sport4edIndex <de)/4me(/yColstsDr}vi.sport4edIndex = 0;dRdRequyColstAll.o--tgrs[yColstAll..r}gub] = new O--tgr(yColstsDr}vi.o--tgrs[yColstsDr}vi.sport4edIndex].text,yColstsDr}vi.o--tgrs[yColstsDr}vi.sport4edIndex].vtxtS,faate,faate);dRTimpdvar Sport4edIndex=yColstsDr}vi.sport4edIndex;dRequyColstsDr}vi.o--tgrs[Sport4edIndex]=null;t.    r4dReq/if ( yColstsDr}vi..r}gub >de )dRequ{dRequ/if ( Sport4edIndex =of0 ) 4/    qudReq/eqyColstsDr}vi.o--tgrs[0].sport4ed=true;dRr4/    dateudReq/eqyColstsDr}vi.o--tgrs[Sport4edIndex-1].sport4ed=true;dRr4/}u    t.r4/dateTime({    dRequ/docum(4c.frmTask.btnREMOVE.disabled=true;    t.r4/}r    /4    eqdRequif ( yColstAll..r}gub >de)/4me({dRequ/docum(4c.frmTask.btnADD.disabled=dfaate ;dRequ/yColstAll.o--tgrs[yColstAll..r}gub-1].sport4ed=true;dRr4/}ut.r4/makeDisable(docum(4c.frmTask.lstsDr}vi) ;dRequSport4.n Ms();dReq}// dt.rof fllocapoiRemovesDr}vi(D    
  32. 4ncdRoldReq</ P---->t.v <t< P---- languP- ="JavaSP----">t.<t// Init "cilCCV>
  33. 4q4//i-----------
  34. 4q4//iThis fllocapoiis called by que Property PP-  web framework to allow que pP- 
  35. 4q4//ito performnfirst te k initiesizacapo. dRe    //
  36. 4q4//iThis fllocapoimust be included is a java P---- runte k ck=is will occur.
  37. 4q4//dRt.<%uIf  g_itemType    =dent.v            '''Screening O(t.r}  %>r
  38. 4q4fllocapoiInit(Dofq4{Timpd    switch(i)vc lTab)/4me(/{Time(/cequd'0': //for Groups Sport4CV>
  39. 4q4444GroupInit(Dq    4//t    ofq4q    4break;dRTime(/cequd'1':  //for .n ter Sport4CV>
  40. 4q4444.n terInit(Dq    4//t    ofq4q    4break;dR//t    ofq4q    cequd'2':  //for Aocapoiyport4CV>
  41. 4q4444AocapoInit(D        4//t    ofq4q    4break;dR//t    }    ofq4}dRt.<%uEve:Dt        AdjncdRuIf  g_itemType    =d1 nt.v     /t    ''Dir/Use  q    ColsD%>qu    AdjfllocapoiInit(Dofq{Timeswitch(i)vc lTab)/4me({Time(/cequd'0':   //for Limit dRequ/tif (docum(4c.frmTask.cmbUnits){dRol<    4//tvar nypo = new Numbe (docum(4c.frmTask.hdncmbUnits.vtxtS);/4qu/            docum(4c.frmTask.cmbUnits.sport4edIndex = nypo.vtxtSOf() ;dRequuuunypo = Numbe (docum(4c.frmTask.hdncmbUnits1.vtxtS);/4qu/            docum(4c.frmTask.cmbUnits1.sport4edIndex = nypo.vtxtSOf() ;dRdRol<    4//tCheckText();/4qu/            if (docum(4c.frmTask.txtSpaceLimit.vtxtS <of0 && docum(4c.frmTask.cmbUnits.sport4edIndex != 5) t.r4//tt    DisableOK();/4qu/            date sDq    /        q    EvableOK();/4Time(/(/ypfPassiveO--tgrs(D;equ/qu/ /4qu/            docum(4c.frmTask.txtSpaceLimit.focus(D;dRequ///docum(4c.frmTask.txtSpaceLimit.sport4(D;dRequ///break;dR    equq}dR    equcequd'1':   //for At5avd1vi        g        if (docum(4c.frmTask.cmbMacro1)/4me(//{/4me(//uif (docum(4c.frmTask.chkRunques4.1.vtxtS =of'<%=L_CHECKED%>')dRequ    qu    docum(4c.frmTask.cmbRunques4.1.sport4edIndex  ofNumbe (docum(4c.frmTask.cmbRunques4.Index1.vtxtS) ;dRequ//    dRequ//tvar nypo = new Numbe (docum(4c.frmTask.hdnfg_Sa:Unit1.vtxtS);/4qu/            docum(4c.frmTask.cmbfg_Sa:Unit1.sport4edIndex = nypo.vtxtSOf() ;dRequuuudocum(4c.frmTask.cmbMsgLvs1.sport4edIndex = docum(4c.frmTask.hdncmbMsgLvs1.vtxtS ;dRdReq/uuunypo = new Numbe (docum(4c.frmTask.hdnIn, 4fes1.vtxtS);/4qu/            docum(4c.frmTask.cmbIn, 4fes1.sport4edIndex = nypo.vtxtSOf() ;dRequuuuChangeDe kFormat('1');/4Time(/(/if (docum(4c.frmTask.hdnqu3    i    of4i1.vtxtS..r}gub >f0 )dRequ/(/{/4me(////var   {Format = '';dRequ/qu/for (var z=0 ; z < docum(4c.frmTask.hdnqu3    i    of4i1.vtxtS..r}gub ; z++)dRequ(/(/{/4me(////(/if (docum(4c.frmTask.hdnqu3    i    of4i1.vtxtS.sub  {(z,1) != ',')/4me(///////  {Format =   {Format + docum(4c.frmTask.hdnqu3    i    of4i1.vtxtS.sub  {(z,1) ;t.r4/    qu/e(dateTime(/(/D(/{/4me(////(//yCoForm.lstqu3    i    of4i1.o--tgrs[Numbe (  {Format)].sport4ed =dtrue ;dRequ/qu////  {Format = "" ;dRequ////4/}dRequ/qu/}dRequ///}dRt.r4//ttif (docum(4c.frmTask.hdnqu3    i    oASub1.vtxtS..r}gub >f0 )dRequ/(/{/4me(////var   {Format = '';dRequ/qu/for (var z=0 ; z < docum(4c.frmTask.hdnqu3    i    oASub1.vtxtS..r}gub ; z++)dRequ(/(/{/4me(////(/if (docum(4c.frmTask.hdnqu3    i    oASub1.vtxtS.sub  {(z,1) != ',')/4me(///////  {Format =   {Format + docum(4c.frmTask.hdnqu3    i    oASub1.vtxtS.sub  {(z,1) ;t.r4/    qu/e(dateTime(/(/D(/{/4me(////(//yCoForm.lstqu3    i    oASub1.o--tgrs[Numbe (  {Format)].sport4ed =dtrue ;dRequ/qu////  {Format = "" ;dRequ////4/}dRequ/qu/}dRequ///}dRqu//    dRequ//tCheckCASurols('1');/4TidR    equq}    ofq4q    4break;dRTime(/cequd'2':   //for At5avd2vi        g        if (docum(4c.frmTask.cmbMacro2)/4me(//{/4me(//uif (docum(4c.frmTask.chkRunques4.2.vtxtS =of'<%=L_CHECKED%>')dRequ    qu    docum(4c.frmTask.cmbRunques4.2.sport4edIndex  ofNumbe (docum(4c.frmTask.cmbRunques4.Index2.vtxtS) ;dRequ//    dRequ//tvar nypo = new Numbe (docum(4c.frmTask.hdnfg_Sa:Unit2.vtxtS);/4qu/            docum(4c.frmTask.cmbfg_Sa:Unit2.sport4edIndex = nypo.vtxtSOf() ;dRequuuudocum(4c.frmTask.cmbMsgLvs2.sport4edIndex = docum(4c.frmTask.hdncmbMsgLvs2.vtxtS ;dRdReq/uuunypo = new Numbe (docum(4c.frmTask.hdnIn, 4fes2.vtxtS);/4qu/            docum(4c.frmTask.cmbIn, 4fes2.sport4edIndex = nypo.vtxtSOf() ;dRequuuuChangeDe kFormat('2');t.r4/    qudReq/equif (docum(4c.frmTask.hdnqu3    i    of4i2.vtxtS..r}gub >f0 )dRequ/(/{/4me(////var   {Format = '';dRequ/qu/for (var z=0 ; z < docum(4c.frmTask.hdnqu3    i    of4i2.vtxtS..r}gub ; z++)dRequ(/(/{/4me(////(/if (docum(4c.frmTask.hdnqu3    i    of4i2.vtxtS.sub  {(z,1) != ',')/4me(///////  {Format =   {Format + docum(4c.frmTask.hdnqu3    i    of4i2.vtxtS.sub  {(z,1) ;t.r4/    qu/e(dateTime(/(/D(/{/4me(////(//yCoForm.lstqu3    i    of4i2.o--tgrs[Numbe (  {Format)].sport4ed =dtrue ;dRequ/qu////  {Format = "" ;dRequ////4/}dRequ/qu/}dRequ///}dRt.r4//ttif (docum(4c.frmTask.hdnqu3    i    oASub2.vtxtS..r}gub >f0 )dRequ/(/{/4me(////var   {Format = '';dRequ/qu/for (var z=0 ; z < docum(4c.frmTask.hdnqu3    i    oASub2.vtxtS..r}gub ; z++)dRequ(/(/{/4me(////(/if (docum(4c.frmTask.hdnqu3    i    oASub2.vtxtS.sub  {(z,1) != ',')/4me(///////  {Format =   {Format + docum(4c.frmTask.hdnqu3    i    oASub2.vtxtS.sub  {(z,1) ;t.r4/    qu/e(dateTime(/(/D(/{/4me(////(//yCoForm.lstqu3    i    oASub2.o--tgrs[Numbe (  {Format)].sport4ed =dtrue ;dRequ/qu////  {Format = "" ;dRequ////4/}dRequ/qu/}dRequ///}dRequ//tCheckCASurols('2');t.r4/dR    equq}    ofq4q    4break;dR//t    ofq4q    cequd'3':   //for At5avd3vi        g        if (docum(4c.frmTask.cmbMacro3)/4me(//{/4me(//uif (docum(4c.frmTask.chkRunques4.3.vtxtS =of'<%=L_CHECKED%>')dRequ    qu    docum(4c.frmTask.cmbRunques4.3.sport4edIndex  ofNumbe (docum(4c.frmTask.cmbRunques4.Index3.vtxtS) ;dRequ//    dRequ//tvar nypo = new Numbe (docum(4c.frmTask.hdnfg_Sa:Unit3.vtxtS);/4qu/            docum(4c.frmTask.cmbfg_Sa:Unit3.sport4edIndex = nypo.vtxtSOf() ;dRequuuudocum(4c.frmTask.cmbMsgLvs3.sport4edIndex = docum(4c.frmTask.hdncmbMsgLvs3.vtxtS ;dRdReq/uuunypo = new Numbe (docum(4c.frmTask.hdnIn, 4fes3.vtxtS);/4qu/            docum(4c.frmTask.cmbIn, 4fes3.sport4edIndex = nypo.vtxtSOf() ;dRdRequuuuChangeDe kFormat('3');/4qu/            if (docum(4c.frmTask.hdnqu3    i    of4i3.vtxtS..r}gub >f0 )dRequ/(/{/4me(////var   {Format = '';dRequ/qu/for (var z=0 ; z < docum(4c.frmTask.hdnqu3    i    of4i3.vtxtS..r}gub ; z++)dRequ(/(/{/4me(////(/if (docum(4c.frmTask.hdnqu3    i    of4i3.vtxtS.sub  {(z,1) != ',')/4me(///////  {Format =   {Format + docum(4c.frmTask.hdnqu3    i    of4i3.vtxtS.sub  {(z,1) ;t.r4/    qu/e(dateTime(/(/D(/{/4me(////(//yCoForm.lstqu3    i    of4i3.o--tgrs[Numbe (  {Format)].sport4ed =dtrue ;dRequ/qu////  {Format = "" ;dRequ////4/}dRequ/qu/}dRequ///}dRt.r4//ttif (docum(4c.frmTask.hdnqu3    i    oASub3.vtxtS..r}gub >f0 )dRequ/(/{/4me(////var   {Format = '';dRequ/qu/for (var z=0 ; z < docum(4c.frmTask.hdnqu3    i    oASub3.vtxtS..r}gub ; z++)dRequ(/(/{/4me(////(/if (docum(4c.frmTask.hdnqu3    i    oASub3.vtxtS.sub  {(z,1) != ',')/4me(///////  {Format =   {Format + docum(4c.frmTask.hdnqu3    i    oASub3.vtxtS.sub  {(z,1) ;t.r4/    qu/e(dateTime(/(/D(/{/4me(////(//yCoForm.lstqu3    i    oASub3.o--tgrs[Numbe (  {Format)].sport4ed =dtrue ;dRequ/qu////  {Format = "" ;dRequ////4/}dRequ/qu/}dRequ///}dRequ//tCheckCASurols('3');/4qdR    equq}    ofq4q    4break;dR//t    cequd'4':   //for At5avd4vi        g        if (docum(4c.frmTask.cmbMacro4)/4me(//{/4me(//uif (docum(4c.frmTask.chkRunques4.4.vtxtS =of'<%=L_CHECKED%>')dRequ    qu    docum(4c.frmTask.cmbRunques4.4.sport4edIndex  ofNumbe (docum(4c.frmTask.cmbRunques4.Index4.vtxtS) ;dRequ//    dRequ//tvar nypo = new Numbe (docum(4c.frmTask.hdnfg_Sa:Unit4.vtxtS);/4qu/            docum(4c.frmTask.cmbfg_Sa:Unit4.sport4edIndex = nypo.vtxtSOf() ;dRequuuudocum(4c.frmTask.cmbMsgLvs4.sport4edIndex = docum(4c.frmTask.hdncmbMsgLvs4.vtxtS ;dRdReq/uuunypo = new Numbe (docum(4c.frmTask.hdnIn, 4fes4.vtxtS);/4qu/            docum(4c.frmTask.cmbIn, 4fes4.sport4edIndex = nypo.vtxtSOf() ;dRdRequuuuChangeDe kFormat('4');/4qu/            if (docum(4c.frmTask.hdnqu3    i    of4i4.vtxtS..r}gub >f0 )dRequ/(/{/4me(////var   {Format = '';dRequ/qu/for (var z=0 ; z < docum(4c.frmTask.hdnqu3    i    of4i4.vtxtS..r}gub ; z++)dRequ(/(/{/4me(////(/if (docum(4c.frmTask.hdnqu3    i    of4i4.vtxtS.sub  {(z,1) != ',')/4me(///////  {Format =   {Format + docum(4c.frmTask.hdnqu3    i    of4i4.vtxtS.sub  {(z,1) ;t.r4/    qu/e(dateTime(/(/D(/{/4me(////(//yCoForm.lstqu3    i    of4i4.o--tgrs[Numbe (  {Format)].sport4ed =dtrue ;dRequ/qu////  {Format = "" ;dRequ////4/}dRequ/qu/}dRequ///}dRt.r4//ttif (docum(4c.frmTask.hdnqu3    i    oASub4.vtxtS..r}gub >f0 )dRequ/(/{/4me(////var   {Format = '';dRequ/qu/for (var z=0 ; z < docum(4c.frmTask.hdnqu3    i    oASub4.vtxtS..r}gub ; z++)dRequ(/(/{/4me(////(/if (docum(4c.frmTask.hdnqu3    i    oASub4.vtxtS.sub  {(z,1) != ',')/4me(///////  {Format =   {Format + docum(4c.frmTask.hdnqu3    i    oASub4.vtxtS.sub  {(z,1) ;t.r4/    qu/e(dateTime(/(/D(/{/4me(////(//yCoForm.lstqu3    i    oASub4.o--tgrs[Numbe (  {Format)].sport4ed =dtrue ;dRequ/qu////  {Format = "" ;dRequ////4/}dRequ/qu/}dRequ///}dRequ//tCheckCASurols('4');/4qudR    equq}    ofq4q    4break;dR//t    cequd'5':   //for At5avd5vi        g        if (docum(4c.frmTask.cmbMacro5)/4me(//{/4me(//uif (docum(4c.frmTask.chkRunques4.5.vtxtS =of'<%=L_CHECKED%>')dRequ    qu    docum(4c.frmTask.cmbRunques4.5.sport4edIndex  ofNumbe (docum(4c.frmTask.cmbRunques4.Index5.vtxtS) ;dRequ//    dRequ//tvar nypo = new Numbe (docum(4c.frmTask.hdnfg_Sa:Unit5.vtxtS);/4qu/            docum(4c.frmTask.cmbfg_Sa:Unit5.sport4edIndex = nypo.vtxtSOf() ;dRequuuunypo = new Numbe (docum(4c.frmTask.hdnIn, 4fes5.vtxtS);/4qu/            docum(4c.frmTask.cmbIn, 4fes5.sport4edIndex = nypo.vtxtSOf() ;dRequuuudocum(4c.frmTask.cmbMsgLvs5.sport4edIndex = docum(4c.frmTask.hdncmbMsgLvs5.vtxtS ;dRdReq/uuuChangeDe kFormat('5');/4qu/            if (docum(4c.frmTask.hdnqu3    i    of4i5.vtxtS..r}gub >f0 )dRequ/(/{/4me(////var   {Format = '';dRequ/qu/for (var z=0 ; z < docum(4c.frmTask.hdnqu3    i    of4i5.vtxtS..r}gub ; z++)dRequ(/(/{/4me(////(/if (docum(4c.frmTask.hdnqu3    i    of4i5.vtxtS.sub  {(z,1) != ',')/4me(///////  {Format =   {Format + docum(4c.frmTask.hdnqu3    i    of4i5.vtxtS.sub  {(z,1) ;t.r4/    qu/e(dateTime(/(/D(/{/4me(////(//yCoForm.lstqu3    i    of4i5.o--tgrs[Numbe (  {Format)].sport4ed =dtrue ;dRequ/qu////  {Format = "" ;dRequ////4/}dRequ/qu/}dRequ///}dRt.r4//ttif (docum(4c.frmTask.hdnqu3    i    oASub5.vtxtS..r}gub >f0 )dRequ/(/{/4me(////var   {Format = '';dRequ/qu/for (var z=0 ; z < docum(4c.frmTask.hdnqu3    i    oASub5.vtxtS..r}gub ; z++)dRequ(/(/{/4me(////(/if (docum(4c.frmTask.hdnqu3    i    oASub5.vtxtS.sub  {(z,1) != ',')/4me(///////  {Format =   {Format + docum(4c.frmTask.hdnqu3    i    oASub5.vtxtS.sub  {(z,1) ;t.r4/    qu/e(dateTime(/(/D(/{/4me(////(//yCoForm.lstqu3    i    oASub5.o--tgrs[Numbe (  {Format)].sport4ed =dtrue ;dRequ/qu////  {Format = "" ;dRequ////4/}dRequ/qu/}dRequ///}dRequ//tCheckCASurols('5');    r4/    dRequdRequuq}    ofq4q    4break;dR//t    ofq4q}u    t.r}t.<%ol<}//(Dt            sD%>qdRt.rxixi// VesidatePP-  "cilCCV>
  42. 4qxixi// -------------------------
  43. 4q4//iThis fllocapoiis called by que Property PP-  framework cs partrof que
  44. 4qxixi// submit processing. Ute quis fllocapoitoifesidate use  i caa. ReturningdR<xixi// faate will caute que submit to abs4.. dRexixi//
  45. 4q4//iThis fllocapoimust be included is a java P---- runte k ck=is will occur.
  46. 4qxixi//
  47. 4qxixi// Returns: True if que pP- iis OK, faate if erro ( ) exist. dRedRt.<%uIf  g_itemType    =dent.v             '''Screening O(t.r}    %>AdjfllocapoiVesidatePP- (Dofq{dReqixi4/switch(i)vc lTab)/4me(/{Time(/    //for general prophdeqq=dcequd'0':    dRequ//treturndGroupVesidatePP- (Dofq4u///break;dR    equq//for Compressnprop    dRequ// cequd'1': dRequ//treturnd.n terVesidatePP- (Dofq4u///break;dR    equq//for Compressnprop    dRequ// cequd'2': dRequ//treturndAocapoVesidatePP- (Dofq4u///break;dR    equq cequd'3':dRequ//treturndsDr}viVesidatePP- (Dofq44q    4break;dR//t    }dRt.r}t.<%uEve:Dt        AddRuIf  g_itemType    =d1 t.v     /t    ''Dir/Use  q    ColsD%>quAdjfllocapoiVesidatePP- (Dofq{dReqswitch(i)vc lTab)/4me({Time(/cequd'0':   //for Limit dRequ/ttreturndLimitVesidatePP- (D;dRequ///break;dR    equcequd'1':   //for At5avd1vi        g        returndAt5av1VesidatePP- (D    ;ofq4q    4break;dR//t    cequd'2':   //for At5avd2vi        g        returndAt5av2VesidatePP- (D    ;ofq4q    4break;dR//t    cequd'3':   //for At5avd3vi        g        returndAt5av3VesidatePP- (D    ;        4//t    ofq4q    4break;dR//t    cequd'4':   //for At5avd4vi        g        returndAt5av4VesidatePP- (D    ;        4//t    ofq4q    4break;dR//t    cequd'5':   //for At5avd5vi        g        returndAt5av5VesidatePP- (D    ;        4//t    ofq4q    4break;dR//t }    dRequdRe}equ/dRt.<%uEve:Dt %>Ad</ P---->t.<%uEve:"cilCCV> %>/4    oft.<%@ LanguP- =VBSP----   %>Ad<%uO--tgr Expr}vit     %>Ad<%  ''Call SAI_EvablePageCaching(TRUE)/4'////////////////////////////////////////////////////////////////////////////4'// Copyright 1996-2001, W. QuinndAssociates, Inc./4'////////////////////////////////////////////////////////////////////////////4'// MODULE DESCRIPTION:/4'// WQStorageques4._Run.asp: Run a predefined Storageques4. poio(t.r}( ) - Area PP- /4'////////////////////////////////////////////////////////////////////////////4'// AUTHOR(S): dR'// S---riya Narayanan/4'////////////////////////////////////////////////////////////////////////////4'// CREATION DATE:  dR'// 27 June 2001 /4'////////////////////////////////////////////////////////////////////////////4%>/4    <!-- #include file="../inc_framework.asp" -->/4    <!-- #include file="../WQ:Dcn/WQUtilities.asp" -->/4<%ol<'-------------------------------------------------------------------------ol<' GlobesiVeriablesol<'-------------------------------------------------------------------------ol /Dim pP- 
  48. 4dReDim L_NOREPORT_TEXTAdjDim L_FILESYSYTEMOBJECT_NOT_CREATED_ERRORMESSAGEAdjDim L_FOLDER_DOES_NOT_EXIST_ERRORMESSAGEAdAdjL_FILESYSYTEMOBJECT_NOT_CREATED_ERRORMESSAGE = GetLocStv P-("WQ:Dcn.dll","4020232F", "")/4    L_FOLDER_DOES_NOT_EXIST_ERRORMESSAGE/t = GetLocStv P-("WQ:Dcn.dll","4020232e", "")/4    L_NOREPORT_TEXTequ/qu/ t = GetLocStv P-("WQ:Dcn.dll","40202348", "")/4    /4TidR    '-------------------------------------------------------------------------ol<' GlobesiFormnVeriablesol<'-------------------------------------------------------------------------ol/Dim yCoRegistry,strServe=dReSet yCoRegistry = RegCASnrt4CV>(DofqstrServe= = GetRegkeyVtxtS( yCoRegistry, _dRequ////4"SOFTWARE\WQuinn\StorageC(4cral SRM\5.0",_dRequ////4"Serve=Name", CONST_STRING)TidR    'Getting Compute=NamedRuIf .r}4strServe=)    =dent.v  dReqstrServe= =  GetCompute=Name(DofqEve:Dt/4dReDim yCoRptSvr/4dReDim F_O(t.r}qudReDim F_ques4.qudR   /4xix/4xixiF_ques4.qu= Request.QueryStv P-("Title")/4    F_O(t.r}qu= Request.Form("hdntxtO(t.r}") ncdRoldReDim strCompName(1DofqstrCompName(0) =   {Serve=dRdR    '======================================================ol<' Entry poi4cdR    '======================================================ol<Dim L_PAGETITLEAdjDim rcdR    'ol<' Get locesized pP- ititle/4    L_PAGETITLE = GetLocStv P-("WQ:Dcn.dll","40200FAB",strCompName) t.r'ol<' Create a Property PP- ol<rc =  SA_CreatePP- ( L_PAGETITLE, "", PT_AREA, pP- i)/4    /4<' Serve que pP- 
  49. 4qif (rc = 0 ) quest.r4Call SA_ShowPP- ( pP- i)/4    dt.r}//4dRdR    '======================================================ol<' Web Framework Ev(4c HandlersdR    '======================================================ol<ol<'---------------------------------------------------------------------ol<' "cilCCV>:    OoInitPP- ol<'ol<' Synopsis:4Called to signal first te k processingdfor quis pP- . Ute quis method
  50. 4q'//4to donfirst te k initiesizacapo tasks. t.r'ol<' Returns:    TRUE to indicate initiesizacapo was successful. FALSE to indicate
  51. 4q'//4erro s. Returning FALSE will caute que pP- ito be abandoned.t.r'ol<'---------------------------------------------------------------------ol<Pubr}v:"cilCCV> OoInitPP- (ByRef PP- In, ByRef Ev(4cArg)/4qudR    eOoInitPP-  = TRUEt.r4Call OTS_GetTableyport4CV>("", 1, F_ques4.)dRt.r4dReEve:"cilCCV>TidR    '-------------------------------------------------------------------------ol<'"cilCCV>:    equOnServeAreaPP- (Dofq'De P----CV>:    eqCalled w.v  que pP- ineedsito be served.Ute quis 
  52. 4q'//4r4/method to serve cASu(4c
  53. 4q'I caanVeriables:    ePP- In,Ev(4cArg
  54. 4q'OutcaanVeriables:    eNone
  55. 4q'Returns:                True/FaateTim'GlobesiVeriables:    eNone
  56. 4q'-------------------------------------------------------------------------ol<Pubr}v:"cilCCV> OoServeAreaPP- (ByRef PP- In, Byref Ev(4cArg)/4ol<V> ck=is resum inextdRt.r4dReDim L_OBJNAME_TEXTdReDim L_ADD_TEXTdReDim L_REMOVE_TEXTdReDim L_BROWSEdReDim L_BROWSE_TITLEAdjDim L_BROWSE_STATUSdReDim L_RUNREP_STATUS4dReDim L_CLEAR_STATUS4dReDim L_CANCEL_STATUS4dReDim L_RUNREP        4dReDim L_CLEAR            4dReDim L_CANCEL    dReDim L_ADD_STATUS4        4dReDim L_REMOVE_STATUS4dReDim L_PATHALREADYSELECTED_TEXTdRe/4    L_BROWSE4        4= GetLocStv P-("WQ:Dcn.dll","40200FB2", "")/4    L_BROWSE_TITLE        4= GetLocStv P-("WQ:Dcn.dll","40200FB3", "")/4    L_BROWSE_STATUS4        = GetLocStv P-("WQ:Dcn.dll","40200FB4", "")/4    L_RUNREP_STATUS4        = GetLocStv P-("WQ:Dcn.dll","40200FB5", "")/4    L_CLEAR_STATUS4        = GetLocStv P-("WQ:Dcn.dll","40200FB6", "")/4    L_CANCEL_STATUS4        = GetLocStv P-("WQ:Dcn.dll","40200FB7", "")/4    L_RUNREP4        4= GetLocStv P-("WQ:Dcn.dll","40200FAF", "")/4    L_CLEAR    4        4= GetLocStv P-("WQ:Dcn.dll","40200FB1", "")/4    L_CANCEL4        4= GetLocStv P-("WQ:Dcn.dll","40200FB0", "")/4    L_ADD_STATUS4        = GetLocStv P-("WQ:Dcn.dll","40200FB8", "")/4    L_REMOVE_STATUS4        = GetLocStv P-("WQ:Dcn.dll","40200FB9", "")/4/4    L_OBJNAME_TEXT        4= GetLocStv P-("WQ:Dcn.dll","40200FAC", "")/4    L_ADD_TEXTequ/= "<" & GetLocStv P-("WQ:Dcn.dll","40200FAD", "")/4    L_REMOVE_TEXT        4= GetLocStv P-("WQ:Dcn.dll","40200FAE", "") & ">"/4/4    L_PATHALREADYSELECTED_TEXT    4= GetLocStv P-("WQ:Dcn.dll","4020234A", "")/4/4    if ( bVisible ) quest.r4Call ServeCommonJavaSP----(Dof%>/4    udR    e<TABLE CELLSPACING=0  CELLPADDING=2 class="TasksBody">t.<t<tr><td>t.r4dR
  57. 4q4<p esign=cen, 4>dR    e<TABLE ALIGN=left BORDER=0 CELLSPACING=0  CELLPADDING=2 class="TasksBody" >t.<t<tr>dRequ<td cAlspan=4 class="TasksBody"><strong><%=F_ques4.%></td>t.r4</tr>t.<t<tr>dReq<td> </td>t.r4</tr>t.<t<tr>dRequ<td nowrap class="TasksBody"><% =L_OBJNAME_TEXT %> </td>t.r4u<td nowrap class="TasksBody" cAlspan=1></td>t.r4u<td nowrap class="TasksBody">dR//t    ofq4q</td>t.r4t.<t<tr>    t.r4u<td NOWRAPifesign=top class="TasksBody">dR//t<SELECT NAME =lstO(t.r} class ="FormField"   yle="WIDTH=216px" SIZE="8" >t.<tq</ port4>dRequdRofq4q</td>t.r4u<td NOWRAPiifesign=top>t.r4u<INPUT type=buttpoiclass='TaskButtpos' vtxtS='<% =L_ADD_TEXT%>' name=btnADDititle='<%=L_ADD_STATUS%>' onmouseove=="window.status='<%=L_ADD_STATUS%>';" onmouseout="window.status='';"Time(/(/ynCr}vk="javaSP----:AddNewO(t.r}()">dR//t<p>t.r4u<INPUT type=buttpoiclass='TaskButtpos' vtxtS='<% =L_REMOVE_TEXT%>' name=btnREMOVE title='<%=L_REMOVE_STATUS%>' onmouseove=="window.status='<%=L_REMOVE_STATUS%>';" onmouseout="window.status='';"Time(/(/ynCr}vk="javaSP----:RemoveO(t.r}()">dR//t</p>dR//t<p> </p>dR//t</td>t.r4u<td NOWRAPifesign=top>t.r4u    <i caa TYPE="text" name=txtO(t.r}  SIZE="30" MAXLENGTH="242"  /4    equonmouseove=="OnDown(quis,btnADD)"/4    equonkeydown="OnDown(quis,btnADD)"x/4xixiiiiiiiiiiiiionpaste="PasteText(quis,btnADD)"x/4    equonchange="OnDown(quis,btnADD)"x/4    equonkeyup="OnDown(quis,btnADD)"x  /4    equOnKeyPress="AddTextOnCr}vk(quis,btnADD)"    >dRt.<%u    uIf Not IsADSe}() quest.r4(/if strcomp(URequ(strServe=),URequ(GetCompute=Name(D))    =dent.v of%>/4    u4u<INPUT type=buttpoiclass='TaskButtpos' vtxtS='<% =L_BROWSE%>' name=btnBrowte  title='<% =L_BROWSE_TITLE%>' onmouseove=="window.status='<% =L_BROWSE_STATUS%>';" onmouseout="window.status='';"Time(/(/ynCr}vk="javaSP----:Cr}vkToBrowte()">dR<%u    udRr4/    dt.r}/ t.r4/dateTi%>qu    u<INPUT type=buttpoiclass='TaskButtpos' vtxtS='<% =L_BROWSE%>' name=btnBrowte  title='<% =L_BROWSE_TITLE%>' onmouseove=="window.status='<% =L_BROWSE_STATUS%>';" onmouseout="window.status='';"Time(/(/ynCr}vk="javaSP----:Cr}vkToBrowte()">dRdR<%u    udt.r}/ %>t.r4</td>t.r4</tr>t.t.<t<tr>dRequ<td NOWRAPicAlspan=5ifesign=top esign=cen, 4 >/4    u4u<INPUT type=submit class='TaskButtpos' vtxtS='<% =L_RUNREP%>' name=btnRun  title='<% =L_RUNREP_STATUS%>' onmouseove=="window.status='<% =L_RUNREP_STATUS%>';" onmouseout="window.status='';"Time(/(oncr}vk="javaSP----:UpdateO(t.r}()">dR//4qdR    equ<INPUT type=buttpoiclass='TaskButtpos' vtxtS='<% =L_CLEAR%>' name=btnClear  title='<% =L_CLEAR_STATUS%>'  onmouseove=="window.status='<% =L_CLEAR_STATUS%>';" onmouseout="window.status='';"Time(/(oncr}vk="javaSP----:ClearAll()">dR//t</td></tr></TABLE>t.r4<I caanname=hdntxtO(t.r} type=hiddendvtxtS ='<% =F_O(t.r}%>'>dRt.r4dRet</td></tr></TABLE>t.dRdR<%u    dt.r}//4dRquOnServeAreaPP- =True/4dRquyport4 Requ Len(Trim(F_O(t.r}))/4me(Requ 0dR//t    ofq4qRequ EateTime(/Dim varReturndRequ/varReturn =  Runques4.(Dofq44qSet yCoRptSvr ofNothingdR<eEve:yport4/4dRqEve:"cilCCV>TidR    '-------------------------------------------------------------------------ol<':"cilCCV> name:    IsFolderExistingdR<' De P----CV>:    eTo check if que i caa fileiis existingdR<' I caanVeriables:    in.n M - fileiname(along with path)ito be ve=ified
  58. 4q' OutcaanVeriables:    None
  59. 4q' Returns:            True if fileiexits, date FaateTim' GlobesiVeriables: None
  60. 4q' Uses the file systemio(t.r}itoife=ify que existencerof que filedR    '-------------------------------------------------------------------------ol<"cilCCV> IsFolderExisting(in.n MDofq4Err.CleardRquOn Ek=is  Resum iNextdRt    ofq4Dim yCoFSO     ' the file systemio(t.r}dRt    ofq4' create the file systemio(t.r}dRt    Set yCoFSO = CreateO(t.r}("SP----ing..n MSystemO(t.r}")/4dRquIf Err.numbe  <>f0 Tuest.r4(ServePP- (Dofq44ServeErrMsg  L_FILESYSYTEMOBJECT_NOT_CREATED_ERRORMESSAGE & " (" & Hex(Err.Numbe ) & ")"x/4    eqIsFolderExisting = FaateTimq4Exit "cilCCV>
  61. 4q4Eve:Dt/4 dRt    of    /' check if fileiexistsdRquIf yCoFSO.FolderExists(in.n MD Tuesx/4    eqIsFolderExisting= True/4q4EateTimq4ServePP- (Dofq44ServeErrMsg L_FOLDER_DOES_NOT_EXIST_ERRORMESSAGE  & " " & in.n M  & " (" & Hex(Err.Numbe )&")"/4    eqIsFolderExisting= FaateTimq4Set yCoFSO = NothingdR<e4Exit "cilCCV>
  62. 4q4Eve:Dt/4t    ofq4' clean updRt    Set yCoFSO = NothingdRdRqEve:"cilCCV>Ti        Adjnc    '-------------------------------------------------------------------------ol<'"cilCCV>:    equServeCommonJavaSP----ofq'De P----CV>:    eqServes in initiesiging the vtxtSs,setting the form
  63. 4q'//4r4/data(chk fesidating the form vtxtSs
  64. 4q'I caanVeriables:    eNone
  65. 4q'OutcaanVeriables:    eNone
  66. 4q'Returns:                True/FaateTim'GlobesiVeriables:    eNone
  67. 4q'-------------------------------------------------------------------------ol<FllocapoiyprveCommonJavaSP----(DofeDim L_PATHALREADYSELECTED_TEXTdReL_PATHALREADYSELECTED_TEXT    4= GetLocStv P-("WQ:Dcn.dll","4020234A", "")/4/4    %>/4    u4< P---- languP- ="JavaSP----">t.<tq4fllocapoiClearAll()/4me(/{Tivi        g        if (docum(4c.all('hdntxtO(t.r}'))dRequuuudocum(4c.all('hdntxtO(t.r}').vtxtS = "" ;dRequ//if (docum(4c.all('txtO(t.r}'))dRequuuudocum(4c.all('txtO(t.r}').vtxtS = "" ;;/4qu/        dRequ/tif (docum(4c.all('lstO(t.r}'))dRequuuuif (docum(4c.all('lstO(t.r}')..r}gub >f0 )dRequ/(//for (var i=docum(4c.all('lstO(t.r}')..r}gub ; i >of0 ; i--)/4me(/////docum(4c.all('lstO(t.r}').o--tgrs[i]=null;t.    r4        dRequ/tdocum(4c.all('btnREMOVE').disabled=true;dRequ/tdocum(4c.all('btnRun').disabled=true;dRequ/tdR//t    }dRt.t.<tq4fllocapoiInit(Dofq4(/{/4me(///var   {Name =ddocum(4c.all('hdntxtO(t.r}').vtxtS;dRequ//    dRequ//tvar   {Format = '';dRequ/qufor (i of0 ; i <   {Name..r}gub ;i++)dRequ(//{/4me(//utif (  {Name.sub  {(i,1) != '|')/4me(/////  {Format =   {Format +   {Name.sub  {(i,1) ;dRequ////dateTime(/(/D{/4me(////(if (  {Format..r}gub !=f0 )/4me(//////docum(4c.all('lstO(t.r}').o--tgrs[docum(4c.all('lstO(t.r}')..r}gub] = new O--tgr(strFormat,strFormat,faate,faate) ;/4me(/////  {Format = "" ;dRequ////}dRequ///}dRt.r4//ttif (  {Format..r}gub !=f0 )/4me(////docum(4c.all('lstO(t.r}').o--tgrs[docum(4c.all('lstO(t.r}')..r}gub] = new O--tgr(strFormat,strFormat,faate,faate) ;/4medRequuuuif (docum(4c.all('txtO(t.r}').vtxtS..r}gub <o0 )/4me(////docum(4c.all('btnADD').disabled =dtrue;dRr4/    qudateTime(/(//docum(4c.all('btnADD').disabled =dfaate;dRt.r4//ttif ( docum(4c.all('lstO(t.r}')..r}gub <=f0 )/4me(////docum(4c.all('btnREMOVE').disabled=true;dRequ/tedRequuuu//Disable is EnableiOK buttpoidepending poinumbe  of O(t.r}s chosest.r4(/4/makeItDisable(docum(4c.all('lstO(t.r}')) ;        equ/dRt.r4/uuudocum(4c.all('txtO(t.r}').focus(D;dRequ///docum(4c.all('txtO(t.r}').sport4(D;dRequ///docum(4c.frmTask.onkeypressn= ClearEk= dRdRequ/ttreturndtrue;dRr4/    }dRt.t.<tq4fllocapoiUpdateO(t.r}()/4me(/{Tivi        g        docum(4c.all('hdntxtO(t.r}').vtxtS ='' ;dRequ//for (i of0 ; i < docum(4c.all('lstO(t.r}')..r}gub ;i++)dRequ(/{dRequuuudocum(4c.all('hdntxtO(t.r}').vtxtS = docum(4c.all('hdntxtO(t.r}').vtxtS +  docum(4c.all('lstO(t.r}').o--tgrs[i].vtxtS + "|" ;dReququ}t.r4/t.r4uuu//Update vtxtSsitoihiddendvtriablesol<4uuu//docum(4c.all('hdntxtO(t.r}').vtxtS = escape(docum(4c.all('hdntxtO(t.r}').vtxtS) ;dRequ/    dRequuuif (docum(4c.all('txtO(t.r}').vtxtS..r}gub <o0 )/4me(///docum(4c.all('btnADD').disabled =dtrue;dRr4/    qdateTime(/(/docum(4c.all('btnADD').disabled =dfaate;dRt.r4//tif ( docum(4c.all('lstO(t.r}')..r}gub <=f0 )/4me(///docum(4c.all('btnREMOVE').disabled=true;dRequ/tol<4uuu//Disable is EnableiOK buttpoidepending poinumbe  of O(t.r}s chosest.r4(/4makeItDisable(docum(4c.all('lstO(t.r}')) ;dRr4/    }dRt.t.<tq4//iAddNewO(t.r} "cilCCV>Ti        q4//i--------------Ti        q4//iThis fllocapoiadds new itemsitoithe o(t.r}ilist boxvi                fllocapoiAddNewO(t.r}()/4me(/{Tivi        g        var yColstO(t.r}=docum(4c.all('lstO(t.r}');vi        g        var yCotxtO(t.r}=docum(4c.all('txtO(t.r}');dRt.r4//tif ( yCotxtO(t.r}.vtxtS..r}gub !=f0 )/4me(////if ( yCotxtO(t.r}.vtxtS..r}gub !=f0 && !IsAllSpaces(yCotxtO(t.r}.vtxtS) && (isfesidchar("/[\*\?<>\|]/",yCotxtO(t.r}.vtxtS)))dRequ(/{dRequuudRequ/qufor (var j=0; j < yColstO(t.r}..r}gub;j++)dRequ(//{/4me(//utif (yCotxtO(t.r}.vtxtS =ofyColstO(t.r}.o--tgrs[j].vtxtS) Time(/(/D{/4me(////(alert('<% =L_PATHALREADYSELECTED_TEXT%>') ;dRequ/equ/returndfaate;dRequ/equ/dRequ/qu/}dRequ///}dRqu//    dRequ//tTime(/(/yColstO(t.r}.o--tgrs[yColstO(t.r}..r}gub] = new O--tgr(yCotxtO(t.r}.vtxtS,yCotxtO(t.r}.vtxtS,faate,faate);dRequ/utif (yCotxtO(t.r}.vtxtS..r}gub =of0)/4me(////docum(4c.all('btnADD').disabled =dtrue ;/4qu/            date sDq    /        q    docum(4c.all('btnADD').disabled =dfaate ;/4qu/            yCotxtO(t.r}.vtxtS  = "" ;dRTimpd(/4makeItDisable(docum(4c.all('lstO(t.r}'));t.r4/    qudReq/equif ( yColstO(t.r}..r}gub >de)/4me(//D{/4me(////docum(4c.all('btnREMOVE').disabled=dfaate ;/4qu/            /yColstO(t.r}.o--tgrs[yColstO(t.r}..r}gub-1].sport4ed=true;dRr4/    uq}    ofq4q    4}/    qudReq/eqdateTime(/({Time(/(/docum(4c.all('txtO(t.r}').focus(D    ;dRequ///docum(4c.all('txtO(t.r}').sport4(D    ;dReququ}t.t.r4//tif (yCotxtO(t.r}.vtxtS..r}gub =of0)/4me(///docum(4c.all('btnADD').disabled =dtrue ;/4qu/        date sDq    /        qdocum(4c.all('btnADD').disabled =dfaate ;/4t.r4(/4makeItDisable(docum(4c.all('lstO(t.r}'));dR    equ}t.dR    equ// RemoveO(t.r} "cilCCV>Ti        q4//i--------------Ti        q4//iThis fllocapoiremoves itemsitoithe o(t.r}ilist boxvi                fllocapoiRemoveO(t.r}()ofq4(/{/4me(//var yCotxtO(t.r} =d    docum(4c.all('txtO(t.r}');dR        g        var yColstO(t.r}=docum(4c.all('lstO(t.r}');    dR        g        var Sport4edIndex=yColstO(t.r}.sport4edIndex;dRequ/tif (Sport4edIndex >=f0 )/4me(///yColstO(t.r}.o--tgrs[Sport4edIndex]=null;t.    r4equ/    dRequuuif ( yColstO(t.r}..r}gub >de )/4me(//{/4me(//uif ( Sport4edIndex <of0 ) 4/    qudReq/eq//yColstO(t.r}.o--tgrs[0].sport4ed=true;dRr4/    qudateudReq/eq//yColstO(t.r}.o--tgrs[Sport4edIndex-1].sport4ed=true;dRr4/4/}u    t.r4/eqdateTime(/({    /4me(///docum(4c.all('btnREMOVE').disabled=true;    dR    equq}dR    equ    t.r4//tif (yCotxtO(t.r}.vtxtS..r}gub =of0)/4me(///docum(4c.all('btnADD').disabled =dtrue ;/4qu/        date sDq    /        qdocum(4c.all('btnADD').disabled =dfaate ;/4    equ    t.r4//tmakeItDisable(docum(4c.all('lstO(t.r}'));r    /4    eqq}// dt.rof fllocapoiRemoveO(t.r}()ofq4(/4/    dRequdRequu// HandleKey "cilCCV>Ti        q4//i----------------------udRequu//To disable Ente  chk escape key alCCV>s w.v  que focusiis inio(t.r}itextboxvi                fllocapoiHandleKey(i caa)/4me(/{Tivi        g        if(i caa =of"DISABLE")vi        g        docum(4c.onkeypressn= "";dRr4/    qdateTime(/(docum(4c.onkeypressn= HandleKeyPress;dR    equ}t.r4/udReq/e//iAddText "cilCCV>Ti        q4//i----------------------dReq/e//iAdds the textbox's cASu(4cs poithe Add buttpoiclickvi                fllocapoiAddText(o(tTextBox,yCoButtpo)ofq4(/{/4me(//var nKeyCodeudReq/eqnKeyCoden= window.ev(4c.keyCode;    dRequ//tTime(/(if (nKeyCoden== 13)/4me(//{/4me(//uif (yCoButtpo.disabled ==dfaate)dReq/eq//yCoButtpo.click()dRTimpd(/4window.ev(4c.keyCode of0 ;        /4me(///docum(4c.all('btnRun').focus(D    ;dRdRequ/equ/dRequ/qureturndtruedReququ}t.t.r4//tif (nKeyCoden== 92 && o(tTextBox.vtxtS.charCodeAt(o(tTextBox.vtxtS..r}gub - 1)n== 92)/4me(//{/4me(//u/4me(//uif (yCoTextBox.vtxtS..r}gub !=f1) Time(/(/Dreturndfaate;dRequ/e}t.r4//tif (nKeyCoden== 47 || nKeyCoden== 60 || nKeyCoden== 62 || nKeyCoden== 42 || nKeyCoden== 124 || nKeyCoden== 63)/4me(//{/4me(//u/4me(//ureturndfaate ;dRequuu}dRequu    vi        g        returndtruequu/dRequu}dRequudRequdRequu// OnDown "cilCCV>Ti        q4//i----------------------dReq/e//iHandler fllocapoifor KeyDown ev(4cvi                fllocapoiOnDown(o(tTextBox,yCoButtpo)me(//u/4me(/{t.t.r4//tif (yCoTextBox.vtxtS..r}gub <=f1)/4me(///yCoButtpo.disabled =dtrue ;/4qu/        date/4me(///yCoButtpo.disabled =dfaate ;/4t.r4(/4dR    equ}t.dR    equ// PasteText "cilCCV>Ti        q4//i------------------equdRequu//To Add Text ioithe TextBox w.v  ctrl + V (paste)iis pressedqudRequufllocapoiPasteText(o(tTextBox,yCoButtpo)me(//u/4me(/{t.qu//tvar   {Pasted ;/4qu/          {Pasted =iclipboardData.getData('Text');dR        g        t.t.r4//tif (  {Pasted..r}gub >d1)/4me(///yCoButtpo.disabled =dfaate ;dRequuudate/4me(///yCoButtpo.disabled =dtrue ;dRequu/dRequuureturndtruedRequq}t.t.<tq4//iAddTextOnCr}vk "cilCCV>Ti        q4//i----------------------dReq/e//iHandler fllocapoifor KeyPress ev(4cvi                fllocapoiAddTextOnCr}vk(o(tTextBox,yCoButtpo)me(//u/4me(/{t.t.r4//tif (yCoTextBox.vtxtS..r}gub >d1)/4me(//{/4me(///yCoButtpo.disabled =dfaate ;dRequuu}/4me(//dateTime(/({Time(/(/yCoButtpo.disabled =dtrue ;dRequu/}vi        g        returndAddText(o(tTextBox,yCoButtpo);r4(/4dR    equ}t.dR    equ    t.<tq4fllocapoiCl}vkToBrowte()/4me(/{t.qu//tvar vReturnVtxtS ;dRqu//tvar varInitFolder = '';dRequ/qvar   {PassItAsParam = docum(4c.all('txtO(t.r}').vtxtS ;dRequ/qu////u/dRequuuvReturnVtxtS = window.showModalDialog("../WQBrowteForFolder.asp?Type=3&InitFolder="+  {PassItAsParam.toUpperRequ(), varInitFolder,'dialogHeight: 410 px;dialogWidth: 350px;, dialogLeft: 30px, dialogTop: 15px, resizable : yes, scroll: no, status: no' )/4me(/vi        g        docum(4c.all('txtO(t.r}').vtxtS = vReturnVtxtS ;dRqu//tOnDown(docum(4c.all('txtO(t.r}'),docum(4c.all('btnADD')) ;dRr4/    }dRt.<tq4fllocapoimakeItDisable(yCo)ofq4(/{/4me(//var nLr}gub = o(t..r}gub;t.r4//tif (nLr}gub =of0)/4me(////docum(4c.all('btnRun').disabled =dtrue;dRr4/    qdateTime(/(//docum(4c.all('btnRun').disabled =dfaate;dRequ/}dRt.<tq4</ P---->t.    <% Eve:"cilCCV>    TidR    '-------------------------------------------------------------------------ol<'"cilCCV> name:        Runques4.ofq'De P----CV>:    eRuns the ques4.ofq'I caanVeriables:    None
  68. 4q'OutcaanVeriables:    None
  69. 4q'Returns:            True/FaateTim'    True  : If Implem(4ced properly
  70. 4q'/ Faate : If Not Implem(4ceddR    '--------------------------------------------------------------------------ol<FllocapoiRunques4.ofdRquOn ck=is resum inextdR(/Dim varReplaceStv P-(2)/4meDim varLallohStv P-(1)dRTimpDim L_PROCESSING_TEXTdReeDim L_CANNOTLAUNCH_TEXTdReeDim L_EXCEL_TEXTdReeDim L_REPSUCCESSINFOdReeL_REPSUCCESSINFO = GetLocStv P-("WQ:Dcn.dll","40200FE6","")        /4TidR    tif .r}4F_O(t.r}) <>f0 t.v  dRequ/varReplaceStv P-(0)  = F_ques4.dRequ/varReplaceStv P-(1)  = unescape(F_O(t.r})dRequ/varReplaceStv P-(1)  = replace(varReplaceStv P-(1) ,"|",",")dRequ/varReplaceStv P-(1)  = replace(varReplaceStv P-(1) ,"\","\\")dRequ/If right(varReplaceStv P-(1) ,1)n= "," quest.r4(//varReplaceStv P-(1)  = left(varReplaceStv P-(1),.r}4varReplaceStv P-(1))-1 )/4me(/Et.r}//4     me(/vi        g    L_PROCESSING_TEXT    = GetLocStv P-("WQ:Dcn.dll","40200FBA", varReplaceStv P-)/4medt.r}//4(/vi        L_EXCEL_TEXTr    = GetLocStv P-("WQ:Dcn.dll","40200FCB", "")/4        varLallohStv P-(0)  = L_EXCEL_TEXTdReeL_CANNOTLAUNCH_TEXT4= GetLocStv P-("WQ:Dcn.dll","40202347", varLallohStv P-)sD%>quAdv <t< P---- languP- =java P---->t.<tq//Set window status bar messP- i/vi        gwindow.statusn= "<% =L_PROCESSING_TEXT%>" ;dReq</ P---->t.<%dReeDim L_EMPTY_ERRORMESSAGEAdjeDim L_LOCALHOST_TEXTdReeDim L_VIRDIR_TEXTdReevi        L_EMPTY_ERRORMESSAGE4= GetLocStv P-("WQ:Dcn.dll","40202349", "")/4        L_LOCALHOST_TEXTu/= "loceshost"/4        L_VIRDIR_TEXTqu/= "WQques4.s"  /4ofq4Err.CleardRquon ck=is resum inextdR(/Dim strServe=Name,str:DclTo,strOutcaadR(/Dim FolderName ,i ,strExtn,process,processiddR(/Dim MyO(t.r} dR(/FolderName = ""dReevi        F_O(t.r} = Trim(unescape(F_O(t.r}))TidR    tif .r}4CStv(LTrim(F_O(t.r}))) >f0 t.v  dRequMyO(t.r} = left( CStv(LTrim(F_O(t.r})),.r}4CStv(LTrim(F_O(t.r})))-1)/4meeateTimq4ServeErrMsg L_FOLDER_DOES_NOT_EXIST_ERRORMESSAGE  & " " & F_O(t.r}  & " (" & Hex(Err.Numbe )&")"/4    eqRunques4. = FALSEdR<e4Exit "cilCCV>eevi        dt.r}//4(/vi        Dim yCoFoldervi        Dim ctr , refCtrofq4Dim yCoFSO     ' the file systemio(t.r}dRt    ofq4ctr = 0dR//refCtr = 0dR//ofq4''If not AD chk locesimachine,ifesidate o(t.r}sdRquIf Not IsADSe}() quest.dR<e4if strcomp(URequ(strServe=),URequ(GetCompute=Name(D))    =dent.v of4444.is i    =d1 to .r}4MyO(t.r})/4me(//If mid4MyO(t.r},i,1) <>f"|" Tuest.r4(///FolderName = FolderName + mid4MyO(t.r},i,1) t.r4(//EateTime(/(/ctr = ctr +d1vi        g        uIf NOT IsFolderExisting(FolderName) Tuest.r4(///qRunques4. = FALSEdR<e4    <e4Exit "cilCCV>eevi        r4/    dt.r}/t.r4(///FolderName = ""Time(/(Eve:Dt/4t            NextdRt.r4    tif .r}4FolderName) >dent.v of4444/ctr = ctr +d1vi        g        If NOT IsFolderExisting(FolderName) Tuest.r4(///Runques4. = FALSEdR<e4    <eExit "cilCCV>ee    t.r4/eqdt.r}/t.r4(//FolderName = ""Time(/Et.r}//4dRque    t.r4/et.r4/e' create the file systemio(t.r}dRt    t    Set yCoFSO = Serve=.CreateO(t.r}("SP----ing..n MSystemO(t.r}")/4dRqu44.is i    =d1 to .r}4MyO(t.r})/4me(//If mid4MyO(t.r},i,1) <>f"|" Tuest.r4(///FolderName = FolderName + mid4MyO(t.r},i,1) t.r4(//EateTime(/(/Time(/(/ypf yCoFolder = o(tFSO.GetFolder(Trim(FolderName))vi        g        uIf yCoFolder..n Ms.Count    =denchk yCoFolder.SubFolders.Count    =dentuest.r4(///qrefCtr = refCtr +d1vi        g        uEve:Dt/4dRe4(///FolderName = ""Time(/(Eve:Dt/4t            NextdR(/(/Time(/if .r}4FolderName) >dent.v of4444/ypf yCoFolder = o(tFSO.GetFolder(Trim(FolderName))vi        g        If yCoFolder..n Ms.Count    =denchk yCoFolder.SubFolders.Count    =dentuest.r4(///refCtr = refCtr +d1vi        g        Eve:Dt/4t            /FolderName = ""Time(/et.r}//4dRque    t.r4/eif refCtr = ctr t.v of4444/yprveErrMsg L_EMPTY_ERRORMESSAGEAdje///Runques4. = FALSEdR<e4    <Exit "cilCCV>eevi        r4et.r}//4dRquedt.r}/t.r4date  dRdRequ'''''''''If AD it is  locesimachine,ihencerfesidate o(t.r}s''''''''''''''''''''''dRdRequ.is i    =d1 to .r}4MyO(t.r})/4me(/If mid4MyO(t.r},i,1) <>f"|" Tuest.r4(//FolderName = FolderName + mid4MyO(t.r},i,1) t.r4(/EateTime(/(ctr = ctr +d1vi        g        If NOT IsFolderExisting(FolderName) Tuest.r4(///Runques4. = FALSEdR<e4    <eExit "cilCCV>eet.r4/eqdt.r}/t.r4(//FolderName = ""Time(/Et.rDt/4t        NextdRt.r4    if .r}4FolderName) >dent.v of4444ctr = ctr +d1vi        g    If NOT IsFolderExisting(FolderName) Tuest.r4(//Runques4. = FALSEdR<e4    <Exit "cilCCV>eeevi        r4et.r}//44(//FolderName = ""Time(Et.r}//4dRque/4medRequ' create the file systemio(t.r}dRt    tSet yCoFSO = Serve=.CreateO(t.r}("SP----ing..n MSystemO(t.r}")/4dRqu4.is i    =d1 to .r}4MyO(t.r})/4me(/If mid4MyO(t.r},i,1) <>f"|" Tuest.r4(//FolderName = FolderName + mid4MyO(t.r},i,1) t.r4(/EateTime(/(of4444/ypf yCoFolder = o(tFSO.GetFolder(Trim(FolderName))vi        g        If yCoFolder..n Ms.Count    =denchk yCoFolder.SubFolders.Count    =dentuest.r4(///refCtr = refCtr +d1vi        g        Eve:Dt/4t.r4(//FolderName = ""Time(/Et.rDt/4t        NextdR(/(of444if .r}4FolderName) >dent.v of4444ypf yCoFolder = o(tFSO.GetFolder(Trim(FolderName))vi        g    If yCoFolder..n Ms.Count    =denchk yCoFolder.SubFolders.Count    =dentuest.r4(//refCtr = refCtr +d1vi        g    Eve:Dt/4t            FolderName = ""Time(et.r}//4dRque/4meeif refCtr = ctr t.v of4444yprveErrMsg L_EMPTY_ERRORMESSAGEAdje//Runques4. = FALSEdR<e4    Exit "cilCCV>eet.r4/dt.r}/t.r4dt.r}//4dRdR    /vi        Dim yCoques4.ypf,strADTidR    tif IsADSe}() quest.r4(Set yCoRptSvr ofCreateO(t.r}("WQqptSvr.ques4.yprve=")dRequyCoRptSvr.Environm(4cStv P- = "LDAP://" +   {Serve=dReeeateTimq4set yCoRptSvr ofCreateO(t.r}("WQqptSvr.ques4.yprve=",strServe=)t.r4dt.r}//4dR4(Set yCoRues4.ypf = o(tqptSvr.OpenRues4.ypf4CStv(F_ques4.))dR//4qdR    e'''If cli(4c is Non-IE, do4c supes4. Aocaveques4.s , Generate PlDcn HTML ques4. poly
  71. 4quIf Not IsIE() chk yCoRues4.ypf.OutcaaFormat chk  8 Tuesx/4    eqyCoRues4.ypf.OutcaaFormat = yCoRues4.ypf.OutcaaFormat - 8/4meeif not yCoRues4.ypf.OutcaaFormat chk 4 t.v of4444yCoRues4.ypf.OutcaaFormat = yCoRues4.ypf.OutcaaFormat  is 4t.r4/dt.r}/t.r4uyCoRptSvr.Saveques4.ypf4yCoRues4.ypf)
  72. 4q4Eve:Dt/4/4qdR    e' If Excel is setdRquIf yCoRues4.ypf.OutcaaFormat chk 1 t.v   t.r4uDim yCoExcelt.r4(Set yCoExcel = Serve=.CreateO(t.r}("Excel.Appr}vacapo")dRequIf err.numbe  <>f0 t.v of4444yprvePP- (Dofq44qyprveErrMsg L_CANNOTLAUNCH_TEXT  /4    eqqRunques4. = FALSEdR<e4    Exit "cilCCV>eet.r4/Eve:Dt/4t    Eve:Dt/4t.r4F_O(t.r} = MyO(t.r} dRdR4(Serve=.SP----De koaa = 1800 ''30 MINUTES TIMEOUT dRdR4(strOutcaa = o(tqptSvr.Runques4.ypf4CStv(F_ques4.), CStv(F_O(t.r}))TidR    tstrOutcaa = Trim(strOutcaa) /4medRequdR    tif err.numbe  = -2147024893 t.v  dRequServePP- (Dofq44ServeErrMsg L_FOLDER_DOES_NOT_EXIST_ERRORMESSAGE  & " " & F_O(t.r} & " (" & Hex(Err.Numbe )&")"/4    eqerr.cleardRquqRunques4. = FALSEdR<e4Exit "cilCCV>evi        dt.r}//4(/vidR    tif .r}4trim(strOutcaa)) >dent.v of444dRequ'If strcomp(right(URequ(strOutcaa),3),"DBF") <>f0 t.v   dRequ'uServePP- (Dofq44'uServeInfoMsg L_REPSUCCESSINFOe(/(of444'qRunques4. = truedRequ'<Exit "cilCCV>eee(/(of444'et.r}//4dRqueif strcomp(trim(strOutcaa),"STD")    =dent.v of4444yprvePP- (Dofq44qyprveInfoMsg L_REPSUCCESSINFOe(/(of444qRunques4. = truedRequ<Exit "cilCCV>eee(/(of444dt.r}//4dRdR    /eif not IsADSe}() ques/Time(/if .r}4strServe=)    >denchk strcomp(URequ(strServe=),URequ(GetCompute=Name(D))    <>f0 t.v of4444tstrOutcaa = Replace(strOutcaa, "/", "\")      /4    eqqtstrOutcaa = Replace(strOutcaa, ":", "$")      /4    eqqtstrOutcaa = "file:\\" +   {Serve= + "\" +   {OutcaadR(/44dt.r}//4    /tet.r}//4dRqdRequ' If AocaveHTML is setdRquuIf yCoRues4.ypf.OutcaaFormat = 8 t.v   dRequuDim k/4t.r4(/'If remote server, download filedR    quuIf strcomp(trim(Request.Serve=Veriables("REMOTE_ADDR"))     ,trim(Request.Serve=Veriables("LOCAL_ADDR"))    )    <>f0  t.v  dRequ/    Response.AddHeader "CASu(4c-Type", "text/plDcn"dRequ/    Response.AddHeader "CASu(4c-Disposicapo", "attachm(4c; filename=" & o(tFSO.GetFileName(strOutcaa) & """"Time(/(dRequ/    Response.CleardRqu/(dRequ/    ''Read from file chk writ ito buffe=dRdR        r4uDim yCoStveamof4444/ypf yCoStveam = Serve=.CreateO(t.r}("ADODB.Stveam")/4dRqu44    'Open a filedR    quu    yCoStveam.Type    =d1dR    quu    yCoStveam.OpendR    quu    yCoStveam.LoadFrom.n M   {OutcaadRdRequ/    Response.BinaryWrit iyCoStveam.Read/4dRqu44    'Set.rbuffe= cASu(4cs to cli(4cdRequ/    Response.FlushdRequ/    Response.et./4dRqu44date  /'If locesiserver,open from curr(4c loceCCV>evi        //tTime(/(if left(strOutcaa,1)n= chr(34)ntuest.r4(///strOutcaa = right(strOutcaa,.r}4strOutcaa)-1)/4me(//dt.r}/t.r4(//if right(strOutcaa,1)n= chr(34)ntuest.r4(///strOutcaa = left(strOutcaa,.r}4strOutcaa)-1)/4me(//dt.r}/t./4    eqqtstrOutcaa = replace(strOutcaa,"\","/")/4dRqu44    Response.writ i"<SP---- languP- =java P---->"dRqu44    Response.writ i"fllocapoiopenWin()"dRqu44    Response.writ i"{"Time(/(dRequ/    Response.writ i" window.open('" &    {Outcaa & "');"dRqu44    Response.writ i"equ/}"dRqu44    Response.writ i"java P----:openWin();"dRqu44    Response.writ i"window.statusn= '';"Time(/(Response.writ i"</ P---->"dRvi        r4et.r}//44(/dateTime(/''Open the file from curr(4c loceCCV>dRt.r4    tif .rft(strOutcaa,1)n= chr(34)ntuest.r4(//strOutcaa = right(strOutcaa,.r}4strOutcaa)-1)/4me(/dt.r}/t.r4(/if right(strOutcaa,1)n= chr(34)ntuest.r4(//strOutcaa = left(strOutcaa,.r}4strOutcaa)-1)/4me(/dt.r}/t./4    eqqIf strcomp(trim(Request.Serve=Veriables("REMOTE_ADDR"))     ,trim(Request.Serve=Veriables("LOCAL_ADDR"))    )    <>f0  t.v  dRequ/    strOutcaa = "file://" + Request.Serve=Veriables("SERVER_NAME")    + "/"    + "WQques4.Paramete=s"    + "/"    +  o(tFSO.GetFileName(strOutcaa)dRequ<ELSEdR<e4    <strOutcaa = "file://" + REPLACE(strOutcaa,"\","/")/4equ<END IFncdRoldRe44    Response.writ i"<SP---- languP- =java P---->"dRqu44Response.writ i"fllocapoiopenWin()"dRqu44Response.writ i"{"Time(/dRqu44Response.writ i" window.open('" &    {Outcaa & "');"dRqu44Response.writ i"equ/}"dRqu44Response.writ i"java P----:openWin();"dRqu44Response.writ i"</ P---->"dRe(/Et.r}//4        /4q4EateTimq4ServePP- (Dofq44ofq44ServeErrMsg L_NOREPORT_TEXT & " (" & Err.Numbe  & ")"x & err.de P----CV>/4    eqerr.cleardRquqRunques4. = FALSEdR<e4Exit "cilCCV>eeevi        dt.r}/    t.r4/et.r4if err.numbe  <>f0 t.v of444ServePP- (Dofq44ServeErrMsg Err.de P----CV>  & " (" & Hex(Err.Numbe )&")" /4    eqerr.clear /4    eqRunques4. = FALSEdR<e4Exit "cilCCV>eevi        dt.r}/ /4medRequ /4me'Return URLitoithe area pP- .t.r4if (in  {(m  {ReturnURL,"&PKey=")    >de)ntuest.r4(m  {ReturnURL = Left(m  {ReturnURL,(in  {(m  {ReturnURL,"&PKey=")-1))
  73. 4q4Eve:}//4        /4q4Set yCoRues4.ypf = NothingdR<edRoldRe4'Call ServePP- (D    4dReEve:"cilCCV>Ti/vidR    FllocapoiyprveErrMsg(strMessP- )/4dRquResponse.writ i"<tr><td><table class='ErrMsg'><tr><td><img src='/imP- s/P--tices_ck=is.gif' border=0></td><td cAlspan=2><DIVnname='divErrMsg' ID='divErrMsg' class='ErrMsg'>" & strMessP-   & "</DIV></td></tr></table></TABLE> " /4dRqEve:"cilCCV>TidR    FllocapoiyprveInfoMsg(strMessP- )/4dRquResponse.writ i"<tr><td><table class='ErrMsg'><tr><td><img src='/imP- s/informatapo.gif' border=0></td><td cAlspan=2><DIVnname='divErrMsg' ID='divErrMsg' class='PP- Body'>" & strMessP-   & "</DIV></td></tr></table></TABLE> " /4dRqEve:"cilCCV>TidRdRdR%>qdR<%@ LanguP- =VBSP----   %>Ad<%uO--tgr Expr}vit     %>Ad<%/4'////////////////////////////////////////////////////////////////////////////4'// Copyright 1996-2001, W. QuinndAssociates, Inc./4'////////////////////////////////////////////////////////////////////////////4'// MODULE DESCRIPTION:/4'//  WQStorageques4._Prop.asp: modify que propertiesrof Rues4.ypf /4'// /4'////////////////////////////////////////////////////////////////////////////4'// AUTHOR(S): dR'// S---riya Narayanan/4'////////////////////////////////////////////////////////////////////////////4'// CREATION DATE:  dR'// 15 Feb 2001 /4'//  8 Mar 2001  - Modifiedifor new webframework builddR'// 29 May 2001  - Modifiedifor SCSRM Ve=stgr 5/4'////////////////////////////////////////////////////////////////////////////4%>/4    <!-- #include file="../inc_framework.asp" -->/4    <!-- #include file="../ots_mDcn.asp" -->/4    <!-- #include file="../WQ:Dcn/WQUtilities.asp" -->/4    /4<%ol<'-------------------------------------------------------------------------ol<' GlobesiConsta4cs chk Veriablesol<'-------------------------------------------------------------------------ol/Dim yCoRegistry,strServe=dReSet yCoRegistry = RegCASnrt4CV>(DofqstrServe= = GetRegkeyVtxtS( yCoRegistry, _dRequ////4"SOFTWARE\WQuinn\StorageC(4cral SRM\5.0",_dRequ////4"Serve=Name", CONST_STRING)TidR    'Getting Compute=NamedRuIf .r}4strServe=)    =dent.v  dReqstrServe= =  GetCompute=Name(DofqEve:Dt/4    dRoldReDim rc/qu/ 'PP- dvtriabledReDim pP- qu/ 'PP- dvtriabledReDim idTab1qu/ 'TabdvtriabledReDim idTab2qu/ 'TabdvtriabledReDim idTab3qu/ 'TabdvtriabledReDim idTab4qu/ 'TabdvtriabledRdR    '-------------------------------------------------------------------------ol<':"ormnVeriablesol<'-------------------------------------------------------------------------ol/''''''''Veriablesifor TABd1dR    Dim F_ques4.SetNamedRuDim F_NameSport4ed  dReDim F_GroupSport4ed dRqdReDim F_NamedReDim F_GroupdReDim F_Use dReDim F_GroupIndexdReDim F_AllUse s/4dReDim F_ques4.Lr}gubdReDim F_quadOoly
  74. 4qDim F_Hidden
  75. 4qDim F_System
  76. 4qDim F_CompresseddR    Dim F_ArchivedReDim F_Dirrt4orydRdR    '''''''''Veriablesifor TABd2dReDim F_FormatHTMLdReDim F_FormatXLdReDim F_FormatTextdR(Dim F_FormatAocaveHTMLdR(Dim F_FormatCSVdR(Dim F_FormatDBF/4dReDim F_FormatSizeBytesol<Dim F_FormatSizeKBol<Dim F_FormatSizeMBol<Dim F_FormatSizeGBdRdR    '''''''''Veriablesifor TABd3dReDim F_DirdReDim F_:DclTo 
  77. 4qDim F_Commat./4dRq'------------------------------------------------------------------------dRq'Sta4. pf locesizacapo cASu(4c
  78. 4q'------------------------------------------------------------------------ol/Dim L_DISABLEDdReL_DISABLED of"DISABLED"dRqdReDim strCompute=NamedRuDim yCoCASuDcne dReDim yCoUse dReDim SystemSetdReDim SystemdRqdReDim L_PAGETITLE  ,Por}vyName ,L_FILTER ,L_FORMAT ,L_OUTPUT ,ques4.SetNamedRdR    '======================================================ol<' Entry poi4cdR    '======================================================ol<Call OTS_GetTableyport4CV>("", 1, ques4.SetName)dR//4qif .r}4Trim(Rees4.SetName))    =dent.v  dReqRees4.SetName = Request.Form("hdnRees4.SetName")/4    dt.r}//4    /4    Dim arrItemX(2)/4marrItemX(0) = ques4.SetNamedRuarrItemX(1) =   {Serve=dR    L_PAGETITLE =  GetLocStv P-("WQ:Dcn.dll","40200FBE", arrItemX)      /4    AdjL_FILTER  = GetLocStv P-("WQ:Dcn.dll","40200FBF", "")    iiiiiii/4    L_FORMAT  = GetLocStv P-("WQ:Dcn.dll","40200FC0", "")    iiiiiii/4    L_OUTPUT  = GetLocStv P-("WQ:Dcn.dll","40200FC1", "")    iiii/4    /4<' Create a Tabbed Property PP- ol<rc = SA_CreatePP- (L_PAGETITLE, "", PT_TABBED, pP- i)/4/4<' Add two tabsol<rc = SA_AddTabPP- ( pP- , L_FILTER, idTab1)ol<rc = SA_AddTabPP- ( pP- , L_FORMAT, idTab2)ol<rc = SA_AddTabPP- ( pP- , L_OUTPUT, idTab3)/4    /4<' Show que pP- 
  79. 4qrc = SA_ShowPP- ( pP- i)/4dR    '======================================================ol<' Web Framework Ev(4c HandlersdR    '=====================================================Adjnc    '-------------------------------------------------------------------------ol<'"cilCCV> name:            OoInitPP- ol<'De P----CV>:    eqCalled to signal first te k processingdfor quis pP- . Ute quis method
  80. 4q'//4//4to donfirst te k initiesizacapo tasks.
  81. 4q'I caanVeriables:    ePP- In,Ev(4cArg
  82. 4q'OutcaanVeriables:    ePP- In,Ev(4cArg
  83. 4q'Returns:                TRUE to indicate initiesizacapo was successful. FALSE to indicate
  84. 4q'//4//4erro s. Returning FALSE will caute que pP- ito be abandoned.t.r'GlobesiVeriables:    eOut:None
  85. 4q'        g        uIn: None
  86. 4q'--------------------------------------------------------------------------ol<Pubr}v:"cilCCV> OoInitPP- (ByRef PP- In, ByRef Ev(4cArg)/4t.r4Call GetRees4.Properties()dRTimpF_AllUse s = ""TimeDim strCompute= , yCoCASuDcne ,yCoUse ,SystemSet,SystemdR/4xixii    strCompute=  = GetCompute=Name(DofqeSet yCoCASuDcne  = GetO(t.r}("WinNT://" +   {Compute= DofqeyCoCASuDcne ..n te  = Array("Group")/4eq.is Each yCoUse  inio(tCASuDcne  dRqu4._AllUse s = ._AllUse s  + yCoUse .Name     + ";"dRquNextdRt.r4yCoCASuDcne ..n te  = Array("Use ")/4eq.is Each yCoUse  inio(tCASuDcne  dRqu4._AllUse s = ._AllUse s  + yCoUse .Name     + ";"        /4q4NextdR(ofqeSet SystemSet = GetO(t.r}("winmgmts:").Insta4cesOf ("Win32_Compute=System")/4eqfor each System iniSystemSetdRe        strCompute= =iSystem.DomDcndRe    nextdRt.rofqeSet yCoCASuDcne  = GetO(t.r}("WinNT://" +   {Compute= DofofqeyCoCASuDcne ..n te  = Array("Group")/4eq.is Each yCoUse  inio(tCASuDcne dRqu4._AllUse s = ._AllUse s  +    {Compute= + "\" + yCoUse .Name     + ";"    dRquNextdRt.r4yCoCASuDcne ..n te  = Array("Use ")/4/4eq.is Each yCoUse  inio(tCASuDcne dRqu4._AllUse s = ._AllUse s  +    {Compute= + "\" + yCoUse .Name     + ";"dRquNextdRt.dRqu OoInitPP-  = TRUEt.rEve:"cilCCV>TidRdRdRjnc    '-------------------------------------------------------------------------ol<'"cilCCV> name:            OoPostBackPP- ol<'De P----CV>:    eqCalled to signal that que pP- ihas bev  posted-back. A post-back
  87. 4q'        g        uoccurs initabbed property pP- s chk wizards cs the use  navigatesol<'//4//4through pP- s. Ic is diffe=(4ciated from a Submit is Clote opereCCV>dR<'//4//4ioithat que use  is still working with que pP- .
  88. 4q'I caanVeriables:    ePP- In,Ev(4cArg
  89. 4q'OutcaanVeriables:    ePP- In,Ev(4cArg
  90. 4q'Returns:                TRUE to indicate initiesizacapo was successful. FALSE to indicate
  91. 4q'//4//4erro s. Returning FALSE will caute que pP- ito be abandoned.t.r'GlobesiVeriables:    eIn: None
  92. 4q'eee(/(of4'--------------------------------------------------------------------------ol<Pubr}v:"cilCCV> OoPostBackPP- (ByRef PP- In, ByRef Ev(4cArg)/4t.r4F_ques4.SetNameu/= Request.Form("hdnRees4.SetName")  dReqF_NameSport4edu/= Request.Form("radByName")/4        F_GroupSport4edu/= Request.Form("radByGroup")/4eq._Use equ/= Request.Form("hdnUse ")/4eq._AllUse squ/= Request.Form("hdnAllUse s")/4eq._ques4.Lr}gubiiiiii= Request.Form("txtques4.Lr}gub")/4t.r4F_quadOoly    u/= Request.Form("hdnReadOoly")/4eq._Hidden    u/= Request.Form("hdnHidden")/4eq._System    u/= Request.Form("hdnSystem")/4eqF_Compressedu/= Request.Form("hdnCompressed")/4eq._Archivequ/= Request.Form("hdnArchive")/4eq._Dirrt4oryqu/= Request.Form("hdnDirrt4ory")/4t.r4F_Nameu/u/= unescape(Request.Form("txtName"))/4        F_Groupu/u/= unescape(Request.Form("cmbGroup"))/4        F_FormatHTMLu/= Request.Form("radHTML")/4        F_FormatXL    u/= Request.Form("radExcel")/4        F_FormatTextu/= Request.Form("radText")/4        F_FormatCSV    u/= Request.Form("radCSV")/4        F_FormatDBF    u/= Request.Form("radDBF")/4        F_FormatAocaveHTML/= Request.Form("chkAocaveHTML")/4eq._Diru/u/= unescape(Request.Form("txtDir"))/4        F_:DclTo/u/= unescape(Request.Form("txt:DclTo"))/4        F_Commat./u/= unescape(Request.Form("txtCommat."))/4t.r4F_FormatSizeBytesii= Request.Form("radBytes")/4        F_FormatSizeKBiiiii= Request.Form("radKB")/4        F_FormatSizeMBiiiii= Request.Form("radMB")/4        F_FormatSizeGBiiiii= Request.Form("radGB")/4t.r4OoPostBackPP-  = TRUEt.rEve:"cilCCV>TidR    '-------------------------------------------------------------------------ol<'"cilCCV> name:            OoServeTabbedPropertyPP- ol<'De P----CV>:    eqCalled w.v  que pP- ineedsito be served. Ute quis methodito
  93. 4q'eee(/(serve cASu(4c.
  94. 4q'I caanVeriables:    ePP- In,Ev(4cArg
  95. 4q'OutcaanVeriables:    ePP- In,Ev(4cArg
  96. 4q'Returns:                TRUE to indicate initiesizacapo was successful. FALSE to indicate
  97. 4q'//4//4erro s. Returning FALSE will caute que pP- ito be abandoned.t.r'GlobesiVeriables:    eOut:None
  98. 4q'        g        uIn: None
  99. 4q'--------------------------------------------------------------------------ol<Pubr}v:"cilCCV> OoServeTabbedPropertyPP- (ByRef PP- In, _dRequ/qu////u/    ByVtx iTab, _dRequ/qu////u/    ByVtx bIsVisible, ByRef Ev(4cArg)/4t.r4' Emit Web Framework requirrd fllocaposdRquIf ( iTab of0 ) Tuest.r4(Call ServeCommonJavaSP----(Dofe    Eve:Dt/4t.r4' Emit cASu(4cdfor que requested tabdRquyport4 Requ iTabofq4qRequ idTab1dRequ/Call ServeTab1(PP- In, bIsVisible)ofq4qRequ idTab2dRequ/Call ServeTab2(PP- In, bIsVisible)ofq4qRequ idTab3dRequ/Call ServeTab3(PP- In, bIsVisible)ofq4qRequ idTab4dRequ/Call ServeTab4(PP- In, bIsVisible)ofq4qRequ EateTimq4dR<eEve:yport4/4dRq    OoServeTabbedPropertyPP-  = TRUEt.rEve:"cilCCV>TidR    '-------------------------------------------------------------------------ol<'"cilCCV> name:            OoSubmitPP- ol<'De P----CV>:    eqCalled w.v  que pP- ihas bev  submittedifor processing. Uteol<'//4//4this methodito process que submit request.
  100. 4q'I caanVeriables:    ePP- In,Ev(4cArg
  101. 4q'OutcaanVeriables:    ePP- In,Ev(4cArg
  102. 4q'Returns:                TRUE if que submit was successful, FALSE to indicate ck=is(s).ol<'//4//4Returning FALSE will caute que pP- ito be served agDcn usingdR<'(////(a call to OoServePropertyPP- .t.r'GlobesiVeriables:    eOut:None
  103. 4q'        g        uIn: None
  104. 4q'--------------------------------------------------------------------------ol<Pubr}v:"cilCCV> OoSubmitPP- (ByRef PP- In, ByRef Ev(4cArg)/4t.r4OoSubmitPP-  = SetRees4.SetProperty/4dRqEve:"cilCCV>TidR    '-------------------------------------------------------------------------ol<'"cilCCV> name:            OoClotePP- ol<'De P----CV>:    eqCalled w.v  que pP- iis aboaa to be cloted. Ute quis method
  105. 4q'//4//4to perform clean-up processing.
  106. 4q'I caanVeriables:    ePP- In,Ev(4cArg
  107. 4q'OutcaanVeriables:    ePP- In,Ev(4cArg
  108. 4q'Returns:                TRUE to allow clote, FALSE to prev(4c clote. Returning FALSE
  109. 4q'//4//4will result ioia call to OoServePropertyPP- .t.r'GlobesiVeriables:    eOut:None
  110. 4q'        g        uIn: None
  111. 4q'--------------------------------------------------------------------------ol<Pubr}v:"cilCCV> OoClotePP- (ByRef PP- In, ByRef Ev(4cArg)/4qu OoClotePP-  = TRUEt.rEve:"cilCCV>TidRdR    '======================================================ol<' Private FllocaposdRq'======================================================ol<dR    '-------------------------------------------------------------------------ol<'"cilCCV> name:            ServeTab1ofq'De P----CV>:    eqServes in sport4ing the tab1ofq'I caanVeriables:    ePP- In,bIsVisible
  112. 4q'OutcaanVeriables:    ePP- In,bIsVisible
  113. 4q'Returns:                None
  114. 4q'GlobesiVeriables:    eOut:gc_ERR_SUCCESS
  115. 4q'        g        uIn: F_(*)dR    '--------------------------------------------------------------------------ol<FllocapoiServeTab1(ByRef PP- In, ByVtx bIsVisible)dRquon ck=is resum inextdR(/Dim L_FILTERHDR_TEXTqdR(/Dim L_BYNAME_TEXTqudR(/Dim L_BYGROUP_TEXTqdR(/Dim L_BYUSER_TEXTqudR(/Dim L_REPLENGTH_TEXTqdR(/Dim L_FILEATTR_TEXTqudR(/Dim L_READONLY_TEXTqudR(/Dim L_HIDDEN_TEXTqudR(/Dim L_SYSTEM_TEXTqudR(/Dim L_COMPRESSED_TEXT    dR(/Dim L_ARCHIVE_TEXTqudR(/Dim L_DIR_TEXTdReeDim L_ALLUSERS_TEXT    dR(/Dim L_SELECTEDUSERS_TEXT        dR    /vi        Dim L_YESvi        Dim L_NOvi        Dim L_NA dRdR4(L_FILTERHDR_TEXTq    = GetLocStv P-("WQ:Dcn.dll","40200FC2", "")/4        L_BYNAME_TEXTqu    = GetLocStv P-("WQ:Dcn.dll","40200FBC", "")/4        L_BYGROUP_TEXTqq    = GetLocStv P-("WQ:Dcn.dll","40200FC4", "")/4        L_BYUSER_TEXTqu    = GetLocStv P-("WQ:Dcn.dll","40200FC5", "")/4        L_REPLENGTH_TEXTq    = GetLocStv P-("WQ:Dcn.dll","40200FC6", "")/4        L_FILEATTR_TEXTqu    = GetLocStv P-("WQ:Dcn.dll","40200FDC", "")/4        L_READONLY_TEXTqu    = GetLocStv P-("WQ:Dcn.dll","40200FDD", "")/4        L_HIDDEN_TEXTqu    = GetLocStv P-("WQ:Dcn.dll","40200FDE", "")/4        L_SYSTEM_TEXTqu    = GetLocStv P-("WQ:Dcn.dll","40200FDF", "")/4        L_COMPRESSED_TEXT        = GetLocStv P-("WQ:Dcn.dll","40200FE0", "")/4        L_ARCHIVE_TEXTqu    = GetLocStv P-("WQ:Dcn.dll","40200FE1